NAME

Mojolicious::Plugin::Vparam - Mojolicious plugin validator for GET/POST data.

DESCRIPTION

Features:

Simple syntax or full featured
Many predefined types
Filters complementary types
Support arrays of values
Support HTML checkbox as bool
Validate all parameters at once and get hash to simple use in any Model
Manage validation errors
Full Mojolicious::Validator::Validation integration

This module use simple parameters types str, int, email, bool, etc. to validate. Instead of many other modules you mostly not need add specific validation subs or rules. Just set parameter type. But if you want sub or regexp you can do it too.

SYNOPSIS

# Add plugin in startup
$self->plugin('Vparam');

# Use in controller
$login = $self->vparam(login    => 'str');
$passw = $self->vparam(password => 'password', size => [8, 100]);
$email = $self->vparam(email    => 'email', optional => 1);

METHODS

vparam

Get one parameter. By default parameter is required.

# Simple get one parameter
$param1 = $self->vparam(date => 'datetime');

# Or more syntax
$param2 = $self->vparam(count => {type => 'int', default => 1});
# Or more simple syntax
$param2 = $self->vparam(count => 'int', default => 1);

vparams

Get many parameters as hash. By default all parameters are required.

%params = $self->vparams(
    # Simple syntax
    name        => 'str',
    password    => qr{^\w{,32}$},
    myparam     => sub { $_[1] && $_[1] eq 'ok' ? 1 : 0 } },
    someone     => ['one', 'two', 'tree'],

    # More syntax
    from        => { type   => 'date', default => '' },
    to          => { type   => 'date', default => '' },
    id          => { type   => 'int' },
    money       => { regexp => qr{^\d+(?:\.\d{2})?$} },
    myparam     => { post   => sub { $_[1] && $_[1] eq 'ok' ? 1 : 0 } },

    # Checkbox
    isa         => { type => 'bool', default => 0 },
);

vsort

Like vparams but add some keys to simple use with tables.

%filters = $self->vsort(
    -sort       => ['name', 'date', ...],

    # next as vparams
    ...
);

page

Page number. Default: 1.

You can set different name by vsort_page config parameter. If you set undef then parameter is not apply.

rws

Rows on page. Default: 25.

You can set different name by vsort_rws config parameter. You can set different default by vsort_rows config parameter. If you set undef then parameter is not apply.

oby

Column number for sorting. Default: 1 - in many cases first database column is primary key. If you set undef then parameter is not apply.

You can set different name by vsort_oby config parameter.

ods

Sort order ASC|DESC. Default: ASC.

You can set different name by vsort_ods config parameter. If you set undef then parameter is not apply.

verror $name

Get parameter error string. Return 0 if no error.

# Get error
print $self->verror('myparam') || 'Ok';
# Set error
$self->verror('myparam', {message => 'Error message'})

verrors

Return erorrs count in scalar context. In list context return erorrs hash.

# List context get hash
my %errors = $self->verrors;

# Scalar context get count
die 'Errors!' if $self->verrors;

vtype $name, %opts

Set new type $name if defined %opts. Else return type $name definition.

# Get type
$self->vtype('mytype');

# Set type
# pre   - get int
# valid - check for not empty
# post  - force number
$self->vtype('mytype',
    pre     => sub {
        my ($self, $param) = @_;
        return int $param // '';
    },
    valid   => sub {
        my ($self, $param) = @_;
        return length $param ? 0 : 'Invalid'
    },
    post    => sub {
        my ($self, $param) = @_;
        return 0 + $param;
    }
);

vfilter $name, $sub

Set new filter $name if defined %opts. Else return filter $name definition.

# Get filter
$self->vfilter('myfilter');

# Set filter
$self->vfilter('myfilter', sub {
    my ($self, $param, $expression) = @_;
    return $param eq $expression ? 0 : 'Invalid';
});

Filter sub must return 0 if parameter value is valid. Or error string if not.

SIMPLE SYNTAX

You can use the simplified syntax instead of specifying the type, simply by using an expression instead.

REGEXP: Apply as regexp filter. No type verification, just match.
CODE $mojo, $value: Apply as post function. You need manual verify and set error.
ARRAY: Apply as in filter. No type verification, just match.

CONFIGURATION

types: You can simple add you own types. Just set this parameters as HashRef with new types definition.
vsort_page: Parameter name for current page number in vsort. Default: page.
vsort_rws: Parameter name for current page rows count in vsort. Default: rws.
rows: Default rows count for vsort_rws. Default: 25.
vsort_oby: Parameter name for current order by vsort. Default: oby.
vsort_ods: Parameter name for current order destination vsort. Default: ods.
ods: Default order destination for vsort_rws. Default: ASC.
phone_country: Phone country. Default: empty.
phone_region: Phone region. Default: empty.
date: Date format for strftime. Default: %F. if no format specified, return DateTime object.
time: Time format for strftime. Default: %T. if no format specified, return DateTime object.
datetime: Datetime format for strftime. Default: '%F %T %z'. if no format specified, return DateTime object.
optional: By default all parameters are required. You can change this by set this parameter as true.
address_secret: Secret for address:points signing. Format: "ADDRESS:LATITUDE,LONGITUDE[MD5]". MD5 ensures that the coordinates belong to address.
password_min: Minimum password length. Default: 8.
mojo_validator: Enable Mojolicious::Validator::Validation integration.

TYPES

List of supported types:

int

Signed integer

numeric or number

Signed number

money

Get money.

percent

Unsigned number: 0 <= percent <= 100.

str

Trimmed text. Must be non empty if required.

text

Any text. No errors.

password

String with minimum length from password_min. Must content characters and digits.

uuid

Standart 32 length UUID. Return in lower case.

date

Get date. Parsed from many formats. See date configuration parameter for result format. See DateTime::Format::DateParse and even more.

time

Get time. Parsed from many formats. See time configuration parameter for result format. See DateTime::Format::DateParse and even more.

datetime

Get full date and time. Parsed from many formats. See datetime configuration parameter for result format. See DateTime::Format::DateParse and even more.

bool

Boolean value. Can be used to get value from checkbox or another sources.

HTML forms do not send checbox if it checked off. You need always set default value to supress error if checkbox not checked:

$self->vparam(mybox => 'bool', default => 0);

email

Email adress.

url

Get url as Mojo::Url object.

phone

Phone in international format.

You can set default country phone_country and region phone_country codes. Then you users can input shortest number. But this is not work if you site has i18n.

json

JSON incapsulated as form parameter.

address

Location address. Two forms are parsed: string and json. Can verify adress sign to trust source.

lon

Longitude.

lat

Latilude.

inn

RU: Taxpayer Identification Number

kpp

RU: Code of reason for registration

ATTRIBUTES

You can set a simple mode as in example or full mode. Full mode keys:

default

Default value. Default: undef.

# Supress myparam to be undefined and error
$self->vparam(myparam => 'str', default => '');

pre $mojo, &sub

Incoming filter sub. Used for primary filtration: string length and trim, etc. Result will be used as new param value.

Usually, if you need this attribute, you need to create a new type.

valid $mojo, &sub

Validation sub. Return 0 if valid, else string of error.

Usually, if you need this attribute, you need to create a new type.

post $mojo, &sub

Out filter sub. Used to modify value for use in you program. Usually used to bless in some object. Result will be used as new param value.

type

Parameter type. If set then some filters will be apply. See TYPES.

$self->vparam(myparam => 'datetime');

After the application of the type used filters.

array

Force value will array. Default: false.

You can force values will arrays by @ prefix or array[...].

# Arrays
$param1 = $self->vparam(array1 => '@int');
$param2 = $self->vparam(array2 => 'array[int]');
$param3 = $self->vparam(array3 => 'int', array => 1);

# The array will come if more than one value incoming
# Example: http://mysite.us?array4=123&array4=456...
$param4 = $self->vparam(array4 => 'int');

optional

By default all parameters are required. You can change this for parameter by set "optional". Then true and value is not passed validation don`t set verrors.

# Simple vparam
# myparam is undef but no error.
$param6 = $self->vparam(myparam => 'int', optional => 1);

# Set one in vparams
%params = $self->vparams(
    myparam     => { type => 'int', optional => 1 },
);

# Set all in vparams
%params = $self->vparams(
    -optional   => 1,
    param1      => 'int',
    param2      => 'int',
);

RESERVED ATTRIBUTES

-sort: List of column names for vsort. Usually not all columns visible for users and you need convert column numbers in names. This also protect you SQL queries from set too much or too low column number.
-optional: Set default optional flag for all params in vparams and vsort;

FILTERS

Filters are used in conjunction with types for additional verification.

min

Check minimum parameter value.

# Error if myparam less than 10
$self->vparam(myparam => 'int', min => 10);

max

Check maximum parameter value.

# Error if myparam greater than 100
$self->vparam(myparam => 'int', max => 100);

range

Check parameter value to be in range.

# Error if myparam less than 10 or greater than 100
$self->vparam(myparam => 'int', range => [10, 100]);

regexp

Check parameter to be match for regexp

# Error if myparam not equal "abc" or "cde"
$self->vparam(myparam => 'int', regexp => qr{^(abc|cde)$});

in

Check parameter value to be in list of defined values.

# Error if myparam not equal "abc" or "cde"
$self->vparam(myparam => 'str', in => [qw(abc cde)]);

size

Check maximum length in utf8.

# Error if value is an empty string
$self->vparam(myparam => 'str', size => [1, 100]);

RESTRICTIONS

* Version 1.0 invert L<valid> behavior: now checker return 0 if no error
  or description string if has.
* New errors keys: orig => in, pre => out

AUTHORS

Dmitry E. Oboukhov <unera@debian.org>, Roman V. Nikolaev <rshadow@rambler.ru>

COPYRIGHT

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.8 or, at your option, any later version of Perl 5 you may have available.

To install Mojolicious::Plugin::Vparam, copy and paste the appropriate command in to your terminal.

cpanm

cpanm Mojolicious::Plugin::Vparam

CPAN shell

perl -MCPAN -e shell
install Mojolicious::Plugin::Vparam

For more information on module installation, please visit the detailed CPAN module installation guide.

	Global
`s`	Focus search bar
`?`	Bring up this help dialog

	GitHub
`g` `p`	Go to pull requests
`g` `i`	go to github issues (only if github is preferred repository)

	POD
`g` `a`	Go to author
`g` `c`	Go to changes
`g` `i`	Go to issues
`g` `d`	Go to dist
`g` `r`	Go to repository/SCM
`g` `s`	Go to source
`g` `b`	Go to file browse

	Search terms
module: (e.g. module:Plugin)
distribution: (e.g. distribution:Dancer auth)
author: (e.g. author:SONGMU Redis)
version: (e.g. version:1.00)