use HTML::TagFilter;
    my $tf = new HTML::TagFilter->new(
        allow => {},
        strip_comments => 1,
    );
    my $text = $tf->filter($html);
[download]

Compared to other offspring of the Parser, HTML::TagFilter is rather limited: it only does one thing, but it does it reasonably well. I think so anyway, but I wrote it :)