Scroll to navigation

CGI::ValidOp::Check::demographics(3pm) User Contributed Perl Documentation CGI::ValidOp::Check::demographics(3pm)

NAME

CGI::ValidOp::Check::demographics - CGI::ValidOp::Check module to validate various demographics.

DESCRIPTION

Should die.
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.
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'
    

AUTHOR

Randall Hansen <legless@cpan.org>

COPYRIGHT

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

2009-11-30 perl v5.20.2