PDA

View Full Version : SOAP::Lite question


norichung
03-20-2003, 03:31 PM
Deal all~~ remember me? I have asked a SOAP::Lite question here before.^^
Until now, I still can't complete my program... it just return a result with incorrect time. Whats wrong to my program? Is server side MUST use SOAP::Lite if I use SOAP::Lite module to build up my client?
Thank you very much.

The web service and my program:

http://dotnet.microsoft.com/search/MSComSearchService.asmx?op=GetBestBets

#!/usr/bin/perl -w
print "Content-type: text/html", "\n\n";

use SOAP::Lite;

my $s = SOAP::Lite
-> uri('http://tempuri.org/')
-> proxy('http://dotnet.microsoft.com/search/MSComSearchService.asmx')
-> on_action(sub{sprintf '%s/%s', @_ })
;

my $ISBN = SOAP::Data->name('Query' => '1033')->type('string');
my $result = $s->GetBestBets($ISBN)->result;

print $result->{PreferredTerm}, "\n";
print $result->{DisplayTerm}, "\n";
print $result->{Found}, "\n";
print $result->{OrigPhrase}, "\n";
print $result->{MultiTerm}, "\n";
print $result->{MultiWord}, "\n";