Select Code to Download

use strict;
use HTML::Tree;
...

print $tree->as_text;

use strict;
...
print $title->as_text , "\n";
print $title->as_HTML , "\n";

my @a_tags = $tree->look_down( '_tag' , 'a' );