1use strict; 2use warnings; 3 4use Test::More tests => 6; 5 6use HTML::FormFu; 7 8my $form = HTML::FormFu->new; 9 10$form->element('Text')->name('foo'); 11$form->element('Submit')->name('submit')->non_param(1); 12 13# Required constraint not affected by non_param() 14$form->constraints('Required'); 15 16# indicator not affected by non_param() 17$form->indicator('submit'); 18 19$form->process( 20 { foo => 1, 21 submit => 'Submit', 22 } ); 23 24is( $form->param('foo'), 1 ); 25ok( !$form->param('submit') ); 26 27is_deeply( [ $form->valid ], ['foo'] ); 28 29ok( $form->valid('foo') ); 30ok( !$form->valid('submit') ); 31 32is_deeply( $form->params, { foo => 1, } ); 33 34