use Test::More tests => 3;
package MyVal;
use Validation::Class;
field password => { required => 1 };
field password_conf => { mixin_field => 'password', matches => 'password' };
field chng_password => { depends_on => ['password_conf'] };
package main;
my $v = MyVal->new( params => { chng_password => 1 } );
ok $v, 'initialization successful';
ok ! $v->validate(qw/chng_password password_conf/), 'validation failed';
ok $v->error_count == 2, 'validation ok cascading not avaiable yet';