CGI::Untaint::zipcode - validate a US zipcode
use CGI::Untaint; my $handler = CGI::Untaint->new($q->Vars);
my $zipcode = $handler->extract( -as_zipcode => 'zip' );
This CGI::Untaint input handler verifies that it is dealing with a reasonable United States zipcode, in either the five- or nine-digit format. It does not check whether the zipcode is real.
Jesse Sheidlower, jester@panix.com
Copyright (C) 2004 Jesse Sheidlower. All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.