my $tree = HTML::TreeBuilder->new;
$tree->parse_file('foo.html');
$non_html = $tree->as_text();