in reply to xpath problem

This works for me: 
my $xp = XML::XPath->new( filename => 'query.xml' );
                          ^^^^^^^^

[download]

In Section Seekers of Perl Wisdom