Select Code to Download

#!/usr/bin/perl -w

...
# Now handle the incoming SOAP method call,
# and return an appropriate SOAP response.
$soap_server->handle();

use strict;
use LWP;
...

    return uc ($word);
}

#!/usr/bin/perl -w

...

# Print the result
print "Result = '$result'\n";

Result = 'MARES EAT OATS, AND DOES EAT OATS, AND LITTLE LAMBS EAT IVY'

Result = ''