Locale::US (3pm)

  use Locale::US;

  my $u = Locale::US->new;

  my $state = $u->{code2state}{$code};
  my $code  = $u->{state2code}{$state};

  my @state = $u->all_state_names;
  my @code  = $u->all_state_codes;

Map from \s-1US\s0 two-letter codes to states and vice versa.

\s-1MAPPING\s0

$self->{code2state}

This is a hashref which has two-letter state names as the key and the long name as the value.

$self->{state2code}

This is a hashref which has the long nameas the key and the two-letter state name as the value.

\s-1DUMPING\s0

$self->all_state_names

Returns an array (not arrayref) of all state names in alphabetical form

$self->all_state_codes

Returns an array (not arrayref) of all state codes in alphabetical form.

• The state name is returned in \*(C`uc()\*(C' format.

• neither hash is strict, though they should be.

Locale::Country

Locale::Country

Abbreviations

<http://www.usps.gov/ncsc/lookups/usps_abbreviations.htm>

Online file with the USPS two-letter codes for the United States and its possessions.

\s-1AUXILIARY\s0 \s-1CODE:\s0

lynx -dump http://www.usps.gov/ncsc/lookups/usps_abbreviations.htm > kruft.txt kruft2codes.pl

Copyright (c) 2002 - $present Terrence Brannon.

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

License: \s-1GPL\s0, Artistic, available in the Debian Linux Distribution at /usr/share/common-licenses/{\s-1GPL\s0,Artistic}

T. M. Brannon, <[email protected]>

\s-1PATCHES\s0

Thanks to stevet \s-1AT\s0 ibrinc for a patch about second call to new failing.