HI ALL!!! I'm new with 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 (key-value): libs and id (for example : libs = DSMZ_BACT , id =
DSM_SP_9849).
I'm not sure how to get the outpus ('result)
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;