use warnings; use strict;
use XML::Twig;
my $twig = XML::Twig->new;
$twig->parse(*DATA);
for my $query ($twig->findnodes("/queries/query")) {
    my $name = $query->field("name");
    my $topN = $query->field("topN");
    print "query name=($name) topN=($topN)\n";
}
__DATA__
<?xml version='1.0'?>
<queries>
    <query>
        <name>topHosts</name>
        <layer>LINK</layer>
        <topN>20</topN>
        <datatype>topHosts</datatype>
        <filter></filter>
    </query>
    <query>
        <name>topHosts</name>
        <layer>LINK</layer>
        <topN>120</topN>
        <datatype>topHosts</datatype>
        <filter></filter>
    </query>
</queries>