use Test::More;
use Test::XML;
use Data::Dumper;
plan tests => 2;
require_ok( 'XHTML::Instrumented' );
my $data = <<'DATA';
head test
@@bob@@.
two.
DATA
my $cmp = <<'DATA';
head test
DATA
my $x = XHTML::Instrumented->new(name => \$data, type => '');
$output = $x->head();
is_xml($output, $cmp, 'head');