NAME
Validator - Input params validator
SYNOPSIS
use Validator;
my $fields = [
{
name => 'Integer',
error => 'Bad format for Integer',
value => 43,
rules => [
{ rule => 'integer' },
{ rule => 'maxlength', param => 1 },
]
},
{ ... }
];
my $validator = Validator->new();
$validator->fields($fields);
my $valid = $validator->isValid();
if ( ref $valid eq 'Validator::ErrorCode' ) {
# error handling
$valid->errorCode();
# or
$valid->errorMsg();
}
in JSON
# Example of array for validator settings # fields = # [ # { # name: 'child_frm_1_txt1', # required: 1, # error: ErrorMessage, # value: value # rules: [ # { rule: 'integer' }, # { rule: 'maxlength', param: 3 } # ] # }, # { # name: 'child_frm_1_txt2', # required: 0, # rules: [ # { rule: 'email' }, # ] # }, # { # name: 'child_frm_2_txt1', # required: 1, # rules: [ # { rule: 'datetime', param: 'YYYY-MM-DD hh:mm' } # ] # }, # { # name: 'child_frm_2_txt2', # required: 1, # rules: [ # { rule: 'minlength', param: 2 }, # { rule: 'maxlength', param: 5 } # ] # } # ] #*/
DESCRIPTION
Class for input method validation by rules from Validator::Rules::Base
EXPORT
TODO
SEE ALSO
TODO
AUTHOR
Alex Nosoff <plcgi1@gmail.com>
COPYRIGHT AND LICENSE
Copyright (C) 2000 by Alex Nosoff
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available.