2010年7月19日星期一

[PerlChina] 请教用SOAP::Lite调用 SOAP/WSDL服务的问题

关于Perl调用SOAP::WSDL协议的web service,想请教一下,

我的代码是这样的

my $WSDL = 'https://ws.loc-aid.net:443/webservice/
LatitudeLongitudeServices?wsdl
';
my $soap = SOAP::Lite
-> uri('http://webservice.portico.locaid.net/')
-> proxy("$WSDL");

my $method = SOAP::Data->name('getLocation');

my @params = ( SOAP::Data->name(login => '3'),
SOAP::Data->name(password => '4'),
SOAP::Data->name(classId => '4'),
SOAP::Data->name(msisdn => 111111111111),
SOAP::Data->name(coorType => 'DMS'),
SOAP::Data->name(locationMethod =>
'LEAST_EXPENSIVE'),
SOAP::Data->name(overage => 1), );
my $result = $soap->call($method => @params)->result;

中间没有报错,但$result 总是为undefined,
我把 $soap->call($method => @params) 这一步的结果dump出来的时候总是会看到500 internal
server error,但service肯定是好的,我用其他语言可以调用成功,比方说c#。

不知道是什么原因,请各位帮忙我看看是哪里出错了,谢谢了

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

没有评论: