use XML::Parser;
use XML::Parser::EasyTree;
$XML::Parser::EasyTree::Noempty=1;
my $p = new XML::Parser(Style => 'EasyTree');
my $tree = $p->parse($xml);

my $node1 = ${$tree[0]}{name};


##</code><code>##

<?xml version="1.0" encoding="UTF-8"?>
<search_results count="0">
   <query>"flaherty jm" [ALL-FIELDS]</query>
</search_results>