use strict; use warnings; use HTML::TreeBuilder; my $html = '

Blah

 

 

Blah

'; my $element_root = HTML::TreeBuilder->new_from_content($html); $element_root->dump; print "\n"; $element_root->splice_content(1,1); $element_root->dump; #### @0 (IMPLICIT) @0.0 (IMPLICIT) @0.1 (IMPLICIT)

@0.1.0 "Blah" " á"

@0.1.2 "á"
@0.1.2.1

@0.1.3 "Blah" @0 (IMPLICIT) @0.0 (IMPLICIT) #### use strict; use warnings; use HTML::Treebuilder; my $html = '

Blah

 

 

Blah

'; my $element_root = HTML::TreeBuilder->new_from_content($html); my $body = $element_root->look_down( _tag => "body"); $body->dump; print "\n"; $body->splice_content(1,2); $body->dump;