use feature 'say'; use Mojo::DOM; my $html = '

Hello

this is a test

this is a second test

some kind of wrapped footer

'; my $dom = Mojo::DOM->new( $html ); say $dom->at('html html')->child_nodes->first->remove;