Help for this page

Select Code to Download

Select or download this

use feature 'say';
use Mojo::DOM;
...

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

Select or download this

<html><head>
                <script>/*some embedded document*/</script>
...
                <p>this is a second test</p>
            </body>
        </html>