VERSION

version 7.900057

SYNOPSIS

use Validation::Class::Simple;
my $rules = Validation::Class::Simple->new(
fields => {
access_code => {
default => 'demo123'
}
}
);
# set parameters to be validated
$rules->params->add($parameters);
# validate
unless ($rules->validate) {
# handle the failures
}

DESCRIPTION

Validation::Class::Directive::Default is a core validation class field directive that holds the value which should be used if no parameter is supplied.

• alternative argument: a-coderef-returning-a-default-value

  This directive can be passed a single value or a coderef which should return the value to be used as the default value:

      fields => {
          access_code => {
              default => sub {
                  my $self = shift; # this coderef will receive a context object
                  return join '::', lc __PACKAGE__, time();
              }
          }
      }
  

AUTHOR

Al Newkirk <[email protected]>

COPYRIGHT AND LICENSE

This software is copyright (c) 2011 by Al Newkirk.

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