Perl/ウェブ/FormValidator-Simpleのプラグインを作るのバックアップ(No.1)

バックアップ一覧
差分を表示
現在との差分を表示
ソースを表示
Perl/ウェブ/FormValidator-Simpleのプラグインを作るへ行く。
- 1 (2010-05-03 (月) 10:13:33)

FormValidator-Simpleのプラグインを作る

 package MyFVS;
 
 use strict;
 use warnings;
 use FormValidator::Simple::Constants;
 
 sub MY_VALIDATION {
    my ($self, $params, $args) = @_;
    my ($year, $month, $day) = ($params->[0], $params->[1], $params->[2]);
    my ($foo, $bar) = ($args->[0], $args->[1]);
    return TRUE;
 }
 
 1;

 my $result = FormValidator::Simple->check(
    $q => [
        { my_date => ['year','month','day'] } => [ ['MY_VALIDATION', 'foo', 'bar'] ]
    ]
 );