NAME

Data::Validator::MultiManager - to manage a multiple validation for Data::Validator

SYNOPSIS

    #!/usr/bin/env perl
    use strict;
    use warnings;

    use Data::Validator::MultiManager;

    my $manager = Data::Validator::MultiManager->new;
    # my $manager = Data::Validator::MultiManager->new('Data::Validator::Recursive');
    $manager->common(
        category => { isa => 'Int' },
    );
    $manager->add(
        collection => {
            id => { isa => 'ArrayRef' },
        },
        entry => {
            id => { isa => 'Int' },
        },
    );

    my $param = {
        category => 1,
        id       => [1,2],
    };

    my $result = $manager->validate($param);

    if (my $e = $result->errors) {
        errors_common($e);
        # $result->invalid is guess to match some validator
        if ($result->invalid eq 'collection') {
            errors_collection($e);
        }
        elsif ($result->invalid eq 'entry') {
            errors_entry($e);
        }
    }
    else {
        if ($result->valid eq 'collection') {
            process_collection($result->value);
        }
        elsif ($result->valid eq 'entry') {
            process_entry($result->value);
        }
    }

DESCRIPTION

Data::Validator::MultiManager is to manage a multiple validation for Data::Validator. Add rules to 'NoThrow' and 'NoRestrict' by default.

Manager's METHOD

Data::Validator::MultiManager->new

$manager->common(@rule)

add common rules.

    $manager->common(
        category => { isa => 'Int' },
    );

$manager->add(@rules)

add new validation rules.

    $manager->add(
        collection => {
            id => { isa => 'ArrayRef' },
        },
        entry => {
            id => { isa => 'Int' },
        },
    );

$manager->validate(@input)

validates @args and return ResultSet.

    my $result = $manager->validate($param);

ResultSet's METHOD

$result->original

return original parameters(@input).

$result->valid

return valid tag.

$result->invalid

return invalid tag. (using priority and count of errors)

$result->values

return HASH reference after validate with valid tag.

$result->error

return first error with invalid tag.

$result->errors

return all of errors with invalid tag.

LICENSE

Copyright (C) Hiroyoshi Houchi.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Hiroyoshi Houchi <hixi@cpan.org>

cpanm Data::Validator::MultiManager

perl -MCPAN -e shell
install Data::Validator::MultiManager