Template::Plugin::Filter::HTMLScrubberがめっちゃ便利

今頃知った罠
http://search.cpan.org/~yupug/Template-Plugin-Filter-HTMLScrubber-0.03/lib/Template/Plugin/Filter/HTMLScrubber.pm

       my $setup = {
                base => {
                        allow => [qw| br hr b a u del i |],
                        rules => [
                                script => 0,
略
        };

[% USE Filter.HTMLScrubber setup  %]
[% html_text | html_scrubber %]

あふぇーって感じ　2006年もの