NAME

Amon2::Plugin::Web::FormValidator::Simple - Amon2 plugin

SYNOPSIS

# MyApp.pm

__PACKAGE__->load_plugins('Web::FormValidator::Simple');

# MyApp/Web/Dispatcher.pm

get '/user/{team}/{name}/' => sub {
    my ($c) = @_;

    # do validation
    $c->form(
        team => [qw!NOT_BLANK!, [qw!LENGTH 1 10!]],
        name => [qw!NOT_BLANK!, [qw!LENGTH 1 10!]],
    );

    # if detect errors, return with a error page.
    if ($c->form->has_error) {
        return $c->render('error.tt');
    }

    ...
};

# same as C::P::FV::S, you can use messages/messages.yml

# development.pl
...

+{
    ...

    validator => +{
        message_format => '<p>%s</p>',
        message_decode_from => 'UTF-8',
        # messages => 'messages.yml',
        messages => +{
            account => +{
                team => +{
                    NOT_BLANK => 'TEAM cannot be blank!',
                    LENGTH => 'TEAM length must be [1, 10]',
                },
                name => +{
                    NOT_BLANK => 'NAME cannnot be blank!',
                    LENGTH => 'NAME length must be [1, 10]',
                },
            },
        },
    },
};

# messages.yml

account:
    team:
        NOT_BLANK: TEAM cannot be blank!
        LENGTH: TEAM length must be [1, 10]
    name:
        NOT_BLANK: NAME cannot be blank!
        LENGTH: NAME length must be [1, 10]

DESCRIPTION

Amon2::Plugin::Web::FormValidator::Simple is a port of Catalyst::Plugin::FormValidator::Simple. This module has the same methods and options, so see her documents.

METHODS

• $c->init()

initial setup.

• $c->form()

validate form/query parameters.

• $c->set_invalid_form()

set error from manual validation.

AUTHOR

JINNOUCHI Yasushi delphinus@remora.cx

SEE ALSO

Amon2::Web FormValidator::Simple Catalyst::Plugin::FormValidator::Simple

LICENSE

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