Catalyst::Plugin::MessageCatalyst::Plugin::Message is a Perl module that contains the great new Catalyst::Plugin::Message! | |
Download |
Catalyst::Plugin::Message Ranking & Summary
Advertisement
- License:
- Perl Artistic License
- Price:
- FREE
- Publisher Name:
- Chunzi
- Publisher web site:
- http://search.cpan.org/~chunzi/Catalyst-Plugin-Message-0.03/lib/Catalyst/Plugin/Message.pm
Catalyst::Plugin::Message Tags
Catalyst::Plugin::Message Description
Catalyst::Plugin::Message is a Perl module that contains the great new Catalyst::Plugin::Message! Catalyst::Plugin::Message is a Perl module that contains the great new Catalyst Message Plugin!SYNOPSIS # in your controller use Catalyst qw/Message/; sub register : Local { my ( $self, $c ) = @_; if ( $c->req->method eq 'POST' ){ my $email = $c->req->param('email'); $c->errmsg( email => 'email can not be empty.' ) unless defined $email; $c->errmsg( email => 'email invalid.' ) unless $email =~ /@/; if ( not $c->errmsg ){ # save data } } $c->stash->{'template'} = 'register.tpl'; } # register.tpl Requirements: · Perl
Catalyst::Plugin::Message Related Software