use strict; use HTML::OOMarkupRemover; my $hsmr = HTML::SomeMarkupRemover->new(\%html_rules); $hsmr->passes_rules($some_html) or die "Ack! I can't cope!"; my $clean_html = $htmr->apply_rules($some_html);