5086257bec411a9171cad1211a44f0ce74776268
11 use_ok
('HTML::TreeBuilder');
12 use_ok
('HTML::Element::Prune');
17 my $root = HTML
::TreeBuilder
->new();
24 <div>There was man named Jed</div>
25 <div>He did not have a head</div>
26 <div>He lived beneath a sled</div>
27 <div>Now he's afraid of Fred...</div>
35 $root->delete_ignorable_whitespace;
41 <div>There was man named Jed</div><div>He did not have a head</div><div>He lived beneath a sled</div><div>Now he's afraid of Fred...</div> </body>
45 #warn sprintf 'HTML:%s:HTML', $root->as_HTML;
47 is_xml
($root->as_HTML, $expected, 'test pruning');
This page took 0.02491 seconds and 3 git commands to generate.