Help for this page
use XML::XPath; my ($xml, $xp); ... print “Parsing failed\n”; } …..
use XML::XPath; use XML::Parser; ... $xp = XML::XPath->new(xml => $xml); } …..