use XML::Simple;
$xml = new XML::Simple;
my $data = XMLin($xmlresult);

print Dumper($data);