How can I strip HTML in a string using Perl?

Question

Is there anyway easier than this to strip HTML from a string using Perl?

$Error_Msg =~ s|||ig;
$Error_Msg =~ s|||ig;
$Error_Msg =~ s|

        

Answer 1

Assuming the code is valid HTML (no stray < or > operators)

$htmlCode =~ s|<.+?>||g;

If you need to remove only bolds, h1's and br's

$htmlCode =~ s###g

And you might want to consider the HTML::Strip module