NAME
Regexp::Common::zip -- provide regexes for zip codes.
SYNOPSIS
use Regexp::Common qw /zip/;
while (<>) {
/^$RE{zip}{Dutch}$/ and print "Dutch zip code\n";
}
DESCRIPTION
Please consult the manual of Regexp::Common for a general description of the works of this interface.
Do not use this module directly, but load it via Regexp::Common.
$RE{zip}{Dutch}{-lax}{-strict}
Return a pattern that recognizes Dutch zip codes. Dutch zip codes consists of 4 digits, followed by 4 uppercase letters. Officially, a single space should be used between the digits and the letters, but this isn't always done in practise. If -strict
is given, a single space is mandatory, else any whitespace (including no whitespace at all) is allowed. Uppercase letters are required, unless the {-lax}
option is used, then lowercase letters may be used.
If {-keep}
is used, the zipcode is returned in $1
.
$RE{zip}{US}{-extended => 'allow'}
Returns a pattern that recognizes US zip codes. US zip codes are 5 digits, with a possible 4 digit extention. By default, the extention is optional. If the option {-extended => 'yes'}
is given, the pattern only matches zip codes with the extention. If the option {-extended => 'no'}
is given, the pattern will not recognize an extention.
If {-keep}
is being used, the following will be returned:
HISTORY
$Log: lingua.pm,v $
Revision 1.2 2003/01/01 19:11:29 abigail
Fixed problem with having different palindrome patterns in same program
Revision 1.1 2003/01/01 17:05:56 abigail
First version
Revision 1.2 2003/01/01 15:09:47 abigail
Added US zip codes.
Revision 1.1 2002/12/31 02:01:33 abigail
First version
SEE ALSO
Regexp::Common for a general description of how to use this interface.
AUTHOR
Damian Conway (damian@conway.org)
MAINTAINANCE
This package is maintained by Abigail (regexp-common@abigail.nl).
BUGS AND IRRITATIONS
Zip codes for most countries are missing. Send them in to regexp-common@abigail.nl.
Do Dutch zip code actually allow all letters? Or are I and O omitted? What about the Q?
COPYRIGHT
Copyright (c) 2001 - 2002, Damian Conway. All Rights Reserved.
This module is free software. It may be used, redistributed
and/or modified under the terms of the Perl Artistic License
(see http://www.perl.com/perl/misc/Artistic.html)