##
$simple1 = XML::Simple->new(ForceArray=>1, KeepRoot=>1);
$data1 = $simple->XMLin("query.xml");
print Dumper($data1) . "\n";
####
$VAR1 = {
'queries' => [
{
'query' => [
{
'topN' => [
'20'
],
'layer' => [
'LINK'
],
'filter' => [
{}
],
'name' => [
'topHosts'
],
'datatype' => [
'topHosts'
]
},
{
'topN' => [
'120'
],
'layer' => [
'LINK'
],
'filter' => [
{}
],
'name' => [
'topHosts'
],
'datatype' => [
'topHosts'
]
}
]
}
]
};