use SOAP::Lite; $rv = SOAP::Lite -> uri("http://example.org/soapexample") -> proxy("http://localhost:12000/dispatch.cgi") -> testCall("foo"); printf "fail" if !defined($rv);