Help for this page

Select Code to Download

Select or download this

use HTML::TreeBuilder::XPath;

...
my @values = $tree->findvalues('//li/a');
print "$_\n" for @values;

Select or download this

my @links = $tree->findnodes('//ul[@class="test"]/li/a') ;
for my $link (@links) {
    print $link->attr('href'), "\n";
    print $link->as_text, "\n";
}