use
strict;
use
warnings;
use
HTML::FormFu;
my
$form
= HTML::FormFu->new({
tt_args
=> {
INCLUDE_PATH
=>
'share/templates/tt/xhtml'
} });
# force a submission
$form
->indicator(
sub
{1} );
my
$hr
=
$form
->element(
'Hr'
);
$form
->process( {} );
my
$hr_xhtml
=
qq{<hr />}
;
is(
"$hr"
,
$hr_xhtml
);