Some text.
<script language="JavaScript">
function foo() {
   ...
}
</script>
blah blah blah.

##</code><code>##

use HTML::JFilter; #http://jenda.krynicky.cz/#HTML::JFilter
my $filter = new HTML::JFilter <<'*END*'
sup
*END*

$filteredHTML = $filter->doSTRING($enteredHTML);