Select Code to Download

datetime => [ [ 'DATETIME_STRPTIME', '%Y-%m-%dT%T%z' ] ],
datetime => [ [qw/DATETIME_FORMAT MySQL/] ],

perl -MFormValidator::Simple -MCGI -le " my $q = CGI->new({qw/ snot 20
+11-08-11 /}); my $result = FormValidator::Simple->check( $q => [ { no
+se => [qw/ snot /] } => [ q/DATE/ ], ] ); warn $result->has_error; "

perl -MFormValidator::Simple  -MCGI -le " my $q = CGI->new({qw/ snot 2
+011-08-11 /}); my $result = FormValidator::Simple->check( $q => [ sno
+t => [ [ qw/ DATETIME_STRPTIME %Y-%m-%d / ] ], ] ); warn $result->has
+_error; "