use
strict;
use
warnings;
my
$multi
= HTML::FormFu::MultiForm->new;
$multi
->load_config_file(
't/multiform-nested-name/multiform.yml'
);
$multi
->process( {
foo
=>
'abc'
,
'block.foo'
=>
'123'
,
submit
=>
'Submit'
,
} );
my
$form
=
$multi
->current_form;
ok(
$form
->submitted_and_valid );
is_deeply(
$form
->params,
{
foo
=>
'abc'
,
submit
=>
'Submit'
,
block
=> {
foo
=>
'123'
, } } );