HTML::FillInForm => 0,
HTML::PrettyPrinter => 0.03,
- HTML::Tree => 3.19,
+ HTML::Tree => 4.1,
List::Rotation::Cycle => 1.003,
List::MoreUtils => 0.09,
-our $VERSION = '4.2.c';
+our $VERSION = '4.3';
$t1->look_down('_tag' => 'body')->replace_content('all gone!');
-is( $t1->as_HTML, '<html><head><title>I like stuff!</title></head><body lang="en-JP">all gone!</body></html>
-', "replaced all of body");
+is( $t1->as_HTML, '<html><head><title>I like stuff!</title></head><body lang="en-JP">all gone!</body></html>', "replaced all of body");
#$t1->look_down('_tag' => 'body')->replace_content('all gone!');
$t1->set_child_content(id => 'corpus', 'all gone!');
-is( $t1->as_HTML, '<html><head><title>I like stuff!</title></head><body id="corpus" lang="en-JP">all gone!</body></html>
-', "replaced all of body");
+is( $t1->as_HTML, '<html><head><title>I like stuff!</title></head><body id="corpus" lang="en-JP">all gone!</body></html>', "replaced all of body");
my $W = $t1->look_down('id' => 'wrapme');
$W->wrap_content($bold);
-is( $W->as_HTML, '<span id="wrapme"><b id="wrapper">um, p < 4!</b></span>
-', "wrapped text");
+is( $W->as_HTML, '<span id="wrapme"><b id="wrapper">um, p < 4!</b></span>', "wrapped text");