Select Code to Download

my @nodes = $p->findnodes('//h2[2]/preceding-sibling::p[preceding-sibl
+ing::h2[1]]');