Select Code to Download

#subroutine to login to webservice
sub usdLogin {
...
    }
    return ($service, $sid);
}

#here is my trace output. Ideally, I would love to capture 
#the faultcode, faultstring and ErrorMessage
...
  </soapenv:Fault>
 </soapenv:Body>
</soapenv:Envelope>

[Fri Sep 19 16:13:42 2008]::ERROR::C:\dev\TWP\USDCache.pl::Unrecognize
+d 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 9
+8.