Select Code to Download

my @stuff =
    $tree->findvalues( '//td[@class="BTrow"]/table/tr/td/table/tr');
print Dumper(\@stuff);