]>
iEval git - html-element-library.git/blob - t/prune.t
af343dbde03d96b9285610f6345d6c0c166897cd
11 use_ok
( 'HTML::TreeBuilder' );
12 use_ok
( 'HTML::Element::Library' );
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.048916 seconds and 3 git commands to generate.