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