The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  вход/выход  слежка  RSS
"Perl-Xml"
Вариант для распечатки  
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"Perl-Xml"  
Сообщение от help (??) on 26-Сен-07, 10:27 
получяю xml сообщение:
use SOAP::Lite;
my $soap = SOAP::Lite
     -> uri('http://sms.com/daemon')
     -> proxy('http://sms.com/cgi-bin/SMS/2.cgi');
    
$xml = SOAP::Data->name('sms' => \SOAP::Data->value(
       SOAP::Data->name('id' => '3334'),
       SOAP::Data->name('language' => 'en'),
       SOAP::Data->name('text' => 'Jhon')));
                                            
$r=$soap->sms($xml);
$rez = $r -> result;
print "Результат:$rez \n";
exit;

теперь в 2.cgi:
#!/usr/bin/perl -w
use SOAP::Transport::HTTP;
SOAP::Transport::HTTP::CGI
    -> dispatch_to('daimon')
    -> handle;
package daimon;
sub sms {
my $class = shift;
return SOAP::Data->name('text'=>$class);
}
должен возращят $class='Jhon' , а он возвращяет $class='daemon'

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

 Оглавление

  • Perl-Xml, NuINu, 17:48 , 26-Сен-07, (1)  
    • tu NuINu, help, 18:10 , 26-Сен-07, (2)  
      • tu NuINu, NuINu, 09:16 , 27-Сен-07, (3)  

Сообщения по теме [Сортировка по времени | RSS]


1. "Perl-Xml"  
Сообщение от NuINu (??) on 26-Сен-07, 17:48 

>package daimon;

????????????????????????????? daemon ????????
>sub sms {
> my $class = shift;
> return SOAP::Data->name('text'=>$class);
>}
>должен возращят $class='Jhon' , а он возвращяет $class='daemon'

первый параметр метода всегда имя класса.
хочешь получить джона поставь
    return SOAP::Data->name('text'=>$envelope->{'text'});

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

2. "tu NuINu"  
Сообщение от help (??) on 26-Сен-07, 18:10 
>[оверквотинг удален]
>????????????????????????????? daemon ????????
>>sub sms {
>> my $class = shift;
>> return SOAP::Data->name('text'=>$class);
>>}
>>должен возращят $class='Jhon' , а он возвращяет $class='daemon'
>
>первый параметр метода всегда имя класса.
>хочешь получить джона поставь
>    return SOAP::Data->name('text'=>$envelope->{'text'});

a esli i Jhona i 'en'

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

3. "tu NuINu"  
Сообщение от NuINu (??) on 27-Сен-07, 09:16 
>[оверквотинг удален]
>>> my $class = shift;
>>> return SOAP::Data->name('text'=>$class);
>>>}
>>>должен возращят $class='Jhon' , а он возвращяет $class='daemon'
>>
>>первый параметр метода всегда имя класса.
>>хочешь получить джона поставь
>>    return SOAP::Data->name('text'=>$envelope->{'text'});
>
>a esli i Jhona i 'en'

тогда смотри тему perl SOAP::Lite

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру