The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use t::Util;
use Test::More tests => 2;
use CGI;

{
    package My::Form;
    use HTML::Shakan::Declare;

    form 'add' => (
        TextField(
            name => 'name',
            required => 1,
        ),
        TextField(
            name => 'email',
            required => 1,
        ),
    );
}

my $form = My::Form->get(
    'add' => (
        request => CGI->new,
    )
);
isa_ok $form, 'HTML::Shakan';
is $form->render, trim(<<'...');
<label for="id_name">name</label><input id="id_name" name="name" type="text" /><label for="id_email">email</label><input id="id_email" name="email" type="text" />
...