CGI::ValidOp::Check::demographics

default

Should die.

us_state2

Passes if value is a valid United States 2-letter abbreviation, as determined by the USPS: http://www.usps.com/ncsc/lookups/usps_abbreviations.html.

us_ssn($constraint)

Passes if value is a 9-digit integer with optional dashes (e.g. 123-45-6789). If $constraint is "integer" the dashes are stripped:

    # given CGI variable 'ssn' equal to '123-45-6789'
    $ssn = $cgi->param( 'ssn', [ 'demographics::ssn' ]);            # eq '123-45-6789'
    $ssn = $cgi->param( 'ssn', [ 'demographics::ssn(integer)' ]);   # eq '123456789'
    

Randall Hansen <legless@cpan.org>

Copyright (c) 2003-2005 Randall Hansen. All rights reserved.

This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html