Bug #21008 for HTML-Strip: Intermittent overkill after <>

I cannot reproduce this issue. Maybe it has to do with using the HTML stripper in multiple e-mails while not resetting it at the end of each run. But even so, it was needed that some tags (and possibly embedded quotes) existed, so that the stripper state was causing these problems. The attached test passes successfully while trying to reveal the pointed problem. Please give a return. If this problem still affects you, provide a minimum sample so that the issue can be reproduced and the cause of the ill-behavior tracked down. As said in the documentation, you probably want to use the module like that: use HTML::Strip; my $hs = HTML::Strip->new; for my $msg (@messages) { my $clean_msg = $hs->parse($msg); $hs->eof; # reset after each message } ########### # the mentioned test (which is also attached) # http://rt.cpan.org/Public/Bug/Display.html?id=21008 use Test::More no_plan => 1; BEGIN { use_ok 'HTML::Strip' } # stripping comments { my $hs = HTML::Strip->new(); is( $hs->parse( "a<>b" ), "a b", 'edge case with <> ok' ); $hs->eof; is( $hs->parse( "a<>b c<>d" ), "a b c d", 'edge case with <>s ok' ); $hs->eof; is( $hs->parse( "From: <>\n\na. Title: some text\n\nb. etc\n" ), "From: \n\na. Title: some text\n\nb. etc\n", 'test case' ); is( $hs->parse( "From: <>\n\na. Title: some text\n\nb. etc\n" ), "From: \n\na. Title: some text\n\nb. etc\n", 'test case' ); $hs->eof; is( $hs->parse( q{this is an "example" with 'quoted' parts that should not be stripped} ), q{this is an "example" with 'quoted' parts that should not be stripped} ); }