##
$dom = $parser->parse_file($file);
my $expr = ('//Article//Main//Sect//H3[contains(.,"Include")]|//Article//Main//Sect//H4[contains(.,"Include")]|//Article//Main[contains(.,"Include")]//*[name()="LI"]');
my @nodes=$dom->findnodes($expr);
foreach $nod(@nodes) {
print "element: ".$nod->nextNonBlankSibling();
}