#!/usr/bin/perl --
use strict; use warnings; use Data::Dump qw/ dd pp /;
use HTML::Element;
use HTML::TreeBuilder;
my $v = HTML::Element->new( qw/ VARIF name foo value test / );
$v->push_content("stuff");
print $v->as_HTML,"\n\n";
my $t = HTML::TreeBuilder->new(qw{ ignore_unknown 0 })->parse_content(q{
stuff
});
print $t->as_HTML,"\n\n";
__END__
stuff
stuff