use Test::More tests => 4; package MyVal; use Validation::Class; package main; my $r = MyVal->new( fields => { one => { label => 'Object', min_digits => 2 } } ); $r->params->{one} = 111; ok $r->validate('one'), 'validation ok'; $r->params->{one} = 11; ok $r->validate('one'), 'validation ok'; $r->params->{one} = 1; ok ! $r->validate('one'), 'validation failed'; $r->params->{one} = '11abcdef'; ok $r->validate('one'), 'validation ok';