perl/soapclient.pl


1
2
3
4
5
6
7
8
9
10
11

#!/usr/bin/perl -w

use SOAP::Lite;

print SOAP::Lite
    -> uri('http://www.soaplite.com/Demo')
    -> proxy('http://services.soaplite.com/hibye.cgi')
    -> hi()
    -> result . "\n";

exit(0);