The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

use strict;
use Test::More tests => 2;
my $form = HTML::FormFu->new;
$form->element('Text')->name('foo')->filter('HTMLEscape');
my $original_foo = qq{&escape "this"};
my $filtered_foo = "&escape "this"";
$form->process( { foo => $original_foo, } );
# foo is filtered
is( $form->param('foo'), $filtered_foo, 'foo filtered' );
is( $form->params->{foo}, $filtered_foo, 'foo filtered' );