The SOAP protocol supported at

JensenWorld.net

Using Soap::Lite, a basic SOAP server is now available at JensenWorld.net. The site is running an Apache 2.0.46 web server on SuSE 8.0 Linux. The hardware is a 166MHz Pentium processor. The following is a sample client implementation using SOAP::Lite.

#!/usr/local/bin/perl -w
# hw_client.pl - Hello client
use SOAP::Lite;
my $name = shift;
print "\n\n" . "Calling the SOAP Server to say hello\n\n";
print "The SOAP Server says: ";
print SOAP::Lite
  -> uri('urn:Hello')
  -> proxy('http://JensenWorld.net:8080/cgi-bin/helloworld.cgi')
  -> sayHello( $name )
  -> result . "\n\n";

% perl -w hw_client.pl "Mr. Smith"

#!/usr/local/bin/perl -w
# gw_client.pl - Goodby client
use SOAP::Lite;
my $name = shift;
print "\n\n" . "Calling the SOAP Server to say goodby\n\n";
print "The SOAP Server says: ";
print SOAP::Lite
  -> uri('urn:Hello')
  -> proxy('http://JensenWorld.net:8080/cgi-bin/byeworld.cgi')
  -> sayBye( $name )
  -> result . "\n\n";