my $input_profile = { required => [qw( s_addr s_tel s_adv01)] }; my $results = Data::FormValidator->check(\%validation_params,$input_profile); my %ret_params = ( 'error_list' => $results->missing); if($results->has_invalid or $results->has_missing){ return $self->tt_process('school_register.tt',\%ret_params); }