1use Test::More tests => 2; 2use Test::Exception; 3 4use HTML::Strip; 5 6# test for RT#41035 7my $hs = HTML::Strip->new(); 8 9ok( $hs->parse('<b>1</b><li>') ); 10lives_ok( sub { $hs->parse('ABC. DEFGH:') }, "no segfault" ); 11 12