SOAP Response attribute mit Perl lesen

[analogie]

Hallo zusammen,

ich brauche mal wieder eure Hilfe. Ich rufe mit soap::lite einen Webservice auf-funzt.
Ich bekome folgenden Response:
<?xml version="1.0" encoding="utf-8" ?>
- <soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
- <soap:Body>
- <GetStatusResponse xmlns="http://opcfoundation.org/webservices/XMLDA/1.0/">
<GetStatusResult RcvTime="2007-07-23T16:50:58.5303750+02:00" ReplyTime="2007-07-23T16:50:58.5460000+02:00" RevisedLocaleID="en" ServerState="running" />
- <Status StartTime="2007-07-19T12:02:31.6871250+02:00" ProductVersion="306.0.224.1">
<StatusInfo>The web service is functioning normally</StatusInfo>
<VendorInfo>SIMATIC NET OPC XML-Webservice DataAccess-V1.0 (C) SIEMENS AG 2002-2006</VendorInfo>
<SupportedLocaleIDs>en</SupportedLocaleIDs>
<SupportedLocaleIDs>de</SupportedLocaleIDs>
<SupportedInterfaceVersions>XML_DA_Version_1_0</SupportedInterfaceVersions>
</Status>
</GetStatusResponse>
</soap:Body>
</soap:Envelope>

Auf die Normalen Werte kann ich zugreifen mti valueof(//GetStatusresponse/Status/StatusInfo)

Wie aber bekomme ich die Attribute, wie StartTime ausgelesen???

Vielen vielen Dank für eure schnelle Hilfe

Thorsten

[analogie]

Hi,

hat sich erledig

Wen es interessiert, es geht mit:
->dataof('//GetStatusResponse/Status')->attr->{'StartTime'};

cu