use HTML::TreeBuilder;
my $tree = HTML::TreeBuilder->new;
$tree->parse_content ($html_text);
foreach my $d ($tree->look_down (_tag => "div", class => "myBody")) {
# $d is the div node. Use whatever you like with/on it
$d->as_text =~ m/something/ and $d->delete; # To remove it.
}
$html_text = $tree->as_HTML (undef, " ", {});