Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re^4: Web services client in Perl

by Anonymous Monk
on Jan 10, 2008 at 09:12 UTC ( #661576=note: print w/replies, xml ) Need Help??

in reply to Re^3: Web services client in Perl
in thread Web services client in Perl


I made some progress I found that Soap::Lite supports rpc/encoded style/encoding only and my WSDL is Document/Literal. So now I'm using SOAP::WSDL
The code is as follows
use SOAP::WSDL; print "<HTML>\n"; print " <TITLE>CGI perl web services client</TITLE>\n"; print "<br>"; my $soap = SOAP::WSDL->new( wsdl => 'http://localhost:8080/MyCalculatorServer/CalculatorWSService? +wsdl' ); $soap->wsdlinit() || die("Can't init"); $som = $soap->call( "getUnitCageSlot", "iFIndex" => 1234); print "result is: ", $som; print "</br>\n"; print "</HTML>\n";

I'm getting the error:

Error processing WSDL: can't find the path '/definitions/types/xsd:schema/xsd:element@name="getUnitCageSlot"/xsd:complexType/descendant::xsd:element'

But all my elements have the prefix of xs and not xsd, so I'm exploring what I can do about that, I thought I'll try change the to check for xs instead of xsd just to see if it would work but it's not working for me right now.

I hope my "revelation" about Soap::Lite and Soap::WSDL would at least help other web services beginners like me. :-)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://661576]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (9)
As of 2018-06-23 18:31 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (125 votes). Check out past polls.