use Test::More tests => 4; use Data::FormValidator; my %FORM = ( stick => 'big', speak => 'softly', mv => ['first','second'], ); my $results = Data::FormValidator->check(\%FORM, { # required => 'stick', # optional => 'mv', } ); ok($results->unknown('stick') eq 'big','using check() as class method'); is($results->unknown('stick'),$FORM{stick}, 'unknown() returns single value in scalar context'); my @mv = $results->unknown('mv'); is_deeply(\@mv,$FORM{mv}, 'unknown() returns multi-valued results'); my @stick = $results->unknown('stick'); is_deeply(\@stick,[ $FORM{stick} ], 'unknown() returns single value in array context');