#subroutine to login to webservice
sub usdLogin {
 	my ($service, $sid) = eval {
    	my $wsdl = 'http://' . USD_Server . USD_Endpoint; 
    	my $srv = SOAP::Lite->uri(USD_URI)->service($wsdl);
		my $id = $srv->login(USD_USER, USD_PWD);
		if($id->fault) {
				printLog("ERROR","$0::".chomp($id->faultcode));
				printLog("ERROR","$0::".chomp($id->faultstring));
				printLog("ERROR","$0::".chomp($id->faultactor));
				return 0;
		}
		return ($srv, $id);
    };
    if ($@) {
    	printLog("ERROR","$0::$@");
    	return exit 1;
    }
    return ($service, $sid);
}	

##</code><code>##

#here is my trace output. Ideally, I would love to capture 
#the faultcode, faultstring and ErrorMessage

<?xml version="1.0" encoding="UTF-8"?><soap:Envelope xmlns:wsdlsoap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:apachesoap="http://xml.apache.org/xml-soap" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns:impl="http://www.ca.com/UnicenterServicePlus/ServiceDesk" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Body><impl:login><username xsi:type="xsd:string">ServiceDesk</username><password xsi:type="xsd:string">default1</password></impl:login></soap:Body></soap:Envelope>
SOAP::Transport::HTTP::Client::send_receive: HTTP/1.1 500 Internal Server Error
Connection: close
Date: Fri, 19 Sep 2008 20:14:28 GMT
Server: Apache-Coyote/1.1
Content-Type: text/xml;charset=utf-8
Client-Date: Fri, 19 Sep 2008 20:14:31 GMT
Client-Peer: 192.168.25.128:8080
Client-Response-Num: 1

<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
 <soapenv:Body>
  <soapenv:Fault>
   <faultcode>soapenv:Client</faultcode>
   <faultstring>Error - invalid login password</faultstring>
   <faultactor></faultactor>
   <detail>
    <ErrorMessage>Error - invalid login password</ErrorMessage>
    <ErrorCode>1000</ErrorCode>
   </detail>
  </soapenv:Fault>
 </soapenv:Body>
</soapenv:Envelope>

##</code><code>##

[Fri Sep 19 16:13:42 2008]::ERROR::C:\dev\TWP\USDCache.pl::Unrecognized method 'fault'. List of available method(s): bunch of methods here.

[Fri Sep 19 16:14:31 2008]::ERROR::C:\dev\TWP\USDCache.pl::Can't call method "fault" on an undefined value at C:\dev\TWP\USDCache.pl line 98.