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

##</code><code>##

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

##</code><code>##

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