my $xp = XML::XPath->new($srcXml); 
 
my $nodeSet = $xp->find('/methodResponse/params/param/value/struct/member'); 
for (my $idx=1; $idx <= $nodeSet->size(); $idx++) { 
  print $xp->getNodeText('/methodResponse/params/param/value/struct/member[' . $idx . ']/name'), " = "; 
  print $xp->getNodeText('/methodResponse/params/param/value/struct/member[' . $idx . ']/value'), "\n"; 
}