From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

GSHANK / HTML-FormHandler-0.20 / t / model_cdbi.t 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13

              
use Test::More tests => 2;
use_ok( 'HTML::FormHandler::Model::CDBI' );
{
   package Test::CDBI;
   use Moose;
   extends 'HTML::FormHandler::Model::CDBI';
}
my $form = Test::CDBI->new;
ok( $form, 'get form from CDBI model' );