use strict; use warnings; use Test::More tests => 2; use HTML::FormFu; my $form = HTML::FormFu->new({ tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } }); $form->load_config_file('t/output_processors/strip_whitespace.yml'); { my $xhtml = <
fieldset
foo bar
foo
bar

XHTML is( "$form", $xhtml ); } $form->output_processor('StripWhitespace'); { my $xhtml = qq{
fieldset
foobar
foo
bar

}; is( "$form", $xhtml ); }