当我使用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";
};
非常感谢您的帮助! 诺亚: - )