Исходное сообщение
"Perl" Отправлено help, 25-Сен-07 17:38
получяю 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 { $p=@_; # object/class reference my $param2 = SOAP::Data->name('text'=>$p); return $param2; } должен возращят $param='Jhon' , а он возвращяет $param='2'