ispman/bin ispman.soap.test.client,1.1,1.2
Atif Ghaffar <[email protected]>
| Newsgroups | gmane.comp.isp.ispman.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/ispman/ispman/bin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7622
Modified Files:
ispman.soap.test.client
Log Message:
fixes
Index: ispman.soap.test.client
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.soap.test.client,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- ispman.soap.test.client 29 Dec 2004 21:48:40 -0000 1.1
+++ ispman.soap.test.client 29 Dec 2004 21:58:51 -0000 1.2
@@ -1,24 +1,24 @@
-#!/usr/bin/perl
-BEGIN{
- use FindBin; unshift @INC, ($FindBin::Bin , "$FindBin::Bin/../lib");
-}
-
-$|++;
-
-use SOAP::Lite;
-my $soap= SOAP::Lite
- -> uri('http://localhost:9999/ISPManSoapServer')
- -> proxy('http://localhost:9999/ISPManSoapServer');
-
-
-
-my $func=shift @ARGV;
-
-
-$response=$soap->$func(@ARGV);
-$res=$response->result;
-print "$res\n";
-
-
-
-
+#!/usr/bin/perl
+BEGIN{
+ use FindBin; unshift @INC, ($FindBin::Bin , "$FindBin::Bin/../lib");
+}
+
+$|++;
+
+use SOAP::Lite;
+my $soap= SOAP::Lite
+ -> uri('http://localhost:9999/ISPManSoapServer')
+ -> proxy('http://localhost:9999/ISPManSoapServer');
+
+
+
+my $func=shift @ARGV;
+
+
+$response=$soap->$func(@ARGV);
+$res=$response->result;
+print "$res\n";
+
+
+
+
-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://productguide.itmanagersjournal.com/