use HTML::Parse;
$_[0] = parse_html($_[0]);
$_[0]->delete