How I can get uuid of the lines from getPhone request.

Version 1
    This document was generated from CDN thread

    Created by: Pavel Shirshov on 17-02-2011 07:03:26 PM
    Hello,
     
    I'm writing on Perl and want to get all lines from phone.
     
    But I can't get it!
    I see in the output of
     
         my $cm = new SOAP::Lite
         uri => 'http://www.cisco.com/AXL/API/1.0',
         proxy => "https://10.5.2.5:8443/axl/";
     
        my $res = $cm->getPhone(
           SOAP:ata->name(phoneName => $sep),
        );
     
        unless ($res->fault) {
           $Data:umper::Indent = 3;
            print Dumper($res);                     # <- Here I see uuid in //device/lines/line/dirn/uuid
            print Dumper($res->paramsall()); # <- Here I see only uuid=''. We lost value
            print Dumper($res->dataof('//device/lines')); # <- The same thing. We lost value
            for my $i ($res->dataof('//device/lines')) {
              print $i->value->{'line'}->{'dirn'};  # <- We can see only ''
           }
        } else {
            print join ', ', $res->faultcode, $res->faultstring;
        }