Select Code to Download

Select or download this

my $response = $s->invoke("disk-list-info");

Select or download this

print $response;   
returns -  
NaElement=HASH(0x84b3408)

Select or download this

print Dumper($response)
returns - 
...
                                                                      
+                      'content' => '13',
                                                                      
+                      'name' => 'bay',
........................

Select or download this

$xmldoc = XMLin($response); - This errors out with - 

read on filehandle failed: Can't locate object method "read" via packa
+ge "NaElement" at /usr/lib/perl5/XML/LibXML.pm line 531. at /usr/lib/
+perl5/XML/LibXML/SAX.pm line 64
 at /usr/share/perl5/XML/Simple.pm line 295

Select or download this
```
XMLin(\%response) - same error. \
```