|
HI ALL!!! I'm new with Soap-Lite and Perl in general, a newbie!!
I want to write a perl client for calling this web service : http://bioinformatics.istge.it:8080/axis/services/cabri.getBacteriaById?wsdl its a Soap web service RPC/encoded. Please could some of you tell me how to write such a script?!!? normally it works with an input with 2 arguments : libs and id (for example : libs = DSMZ_BACT , id = DSM_SP_9849).
Thank you very much regards
I tried in this way but it seems not to work!
#!perl -w
# Enable Perl warnings
use strict;
use warnings;
# SOAP::Lite module
use SOAP::Lite;
my %params = (
"libs" => "DSMZ_BACT" ,
"id" => "DSM_SP_9849"
);
#my %output = ( "output" => "" );
# WSDbfetch WSDL URL
my $WSDL = 'http://bioinformatics.istge.it:8080/axis/services/cabri.getBacteriaById?wsdl';
# Create the service interface
my $soap = new SOAP::Lite->service($WSDL);
my %output = $soap->runAndWaitFor(%params);
#my $result = $output->valueof('//output');
#print $result ;
#print $output->{'output'};
print %output;
|
