Calling axis stock quote example from perl
John Heim <[email protected]>
| Newsgroups | gmane.text.xml.soap.user |
|---|---|
| Message-ID | <[email protected]> |
I went all the way through the axis installation instructions at
http://ws.apache.org/axis/java/install.html. I was able to run the stock
quote demo and got back the correct result (55.25). If I go to
http://localhost:8080/axis/servlet/AxisServlet, I get a page that says,
"And now some services" and I can see the services listed there including
the following:
* urn:xmltoday-delayed-quotes (wsdl)
* test
* getQuote
now, however, I want to call it from perl. But I can't get it to return
anything. My code is below. Is there some place where they document how to
call this service?
#!/usr/bin/perl
use SOAP::Lite;
print "The SOAP Server says: ";
print SOAP::Lite
-> uri('urn:xmltoday-delayed-quotes')
-> proxy('http://localhost:8080/axis/servlet/AxisServlet')
-> getQuote('user1', 'XXX')
-> result . "\n\n";
--
John G. Heim
University of Wisconsin - Division of Information Technology (DoIT)
1210 West Dayton St, #4297, Phone: 2-9887
To boldly code what no one has coded before.