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; ##

##


                
            
            
                Hello
                this is a test
                this is a second test