通过旧的perl版本的Web服务

时间:2011-05-04 07:22:38

标签: perl client perl-module

当我使用perl的升级版本(当然,也是soap :: lite的升级版本) 所以我用所有需要的方法成功连接到我的服务器。 当我使用较旧的perl版本(当然,也是旧版本的soap :: lite)时,所以信封的创建方式不同,而且我没有成功调用获得params的服务器方法 好。 是否需要在代码中或仅在模块中更改某些内容? 如果可以通过代码进行更改,那么我需要更改哪些内容。现在我的代码看起来像:

my $ws_url = '$url';
my $ws_uri = '$uri';
my $ws_xmlns = '$xmlns';            

eval
{
                  my $soap = SOAP::Lite
                  -> uri( $ws_uri)
                  -> on_action(sub{sprintf '%s', @_})
                  -> proxy($ws_url,timeout => 15);

                 my @params = ( SOAP::Data->name(Add => "$paramAdd"));
                 $response = $soap->EndUnit(@params);

                  if($response->fault)
                  {
                      # die raises an exception
                      print "=======fault happened=====\n";
                      die $response->faultstring;
                  }
                  else
                  {
                      print $response->result;
                      print "\n";
                  }
                        };
                        if ($@)
                        {
                          print "$@\n";
                          print "Failed \n";
                        };

非常感谢您的帮助! 诺亚: - )

1 个答案:

答案 0 :(得分:0)

查看您正在使用的SOAP :: Lite版本之间的更改:Changes

此外,您要列出您正在讨论的Perl和SOAP :: Lite的版本。