use strict; use warnings; use Test::More tests => 1; use HTML::FormFu; my $form = HTML::FormFu->new({ tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } }); $form->auto_fieldset(1); $form->javascript('foo();'); # xhtml output my $xhtml = <
EOF is( "$form", $xhtml );