The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use Test::More tests => 1;

use HTML::FormFu;

my $form = HTML::FormFu->new;

# dies

eval {
    $form->element('Radiogroup')->name('foo')->options( [ {
                label      => 'fu',
                value      => '1',
                attributes => { foo => 1 },
                attrs      => { bar => 2 },
            } ] );
};

ok($@);