1234567891011121314151617181920 use strict;use warnings;use Test::More tests => 1;use HTML::FormFu;my $form = HTML::FormFu->new;# dieseval { $form->element('Radiogroup')->name('foo')->options( [ { label => 'fu', value => '1', unknown => 'dies', } ] );};ok($@);
use
strict;
warnings;
Test::More
tests
=> 1;
HTML::FormFu;
my
$form
= HTML::FormFu->new;
# dies
eval
{
->element(
'Radiogroup'
)->name(
'foo'
)->options( [
label
=>
'fu'
,
value
'1'
unknown
'dies'
} ] );
};
ok($@);