diff options
| author | Michael Stevens <mstevens@etla.org> | 2001-03-15 21:25:18 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-16 02:56:04 +0000 |
| commit | bbc7dcd2bd43efd6773e46b614c6eb1db5af78d2 (patch) | |
| tree | cf0748288cb60b19776c0b7e0af0c8892cf713f5 /lib/Locale | |
| parent | cea6626fc5e04af2c1d079dd4d3784eb2c21174b (diff) | |
| download | perl-bbc7dcd2bd43efd6773e46b614c6eb1db5af78d2.tar.gz | |
more pod patches
Message-ID: <20010315212518.A18870@firedrake.org>
p4raw-id: //depot/perl@9176
Diffstat (limited to 'lib/Locale')
| -rw-r--r-- | lib/Locale/Constants.pm | 2 | ||||
| -rw-r--r-- | lib/Locale/Country.pm | 10 | ||||
| -rw-r--r-- | lib/Locale/Language.pm | 6 |
3 files changed, 9 insertions, 9 deletions
diff --git a/lib/Locale/Constants.pm b/lib/Locale/Constants.pm index cc11969c2c..957207ed90 100644 --- a/lib/Locale/Constants.pm +++ b/lib/Locale/Constants.pm @@ -31,7 +31,7 @@ Locale::Constants - constants for Locale codes =head1 SYNOPSIS use Locale::Constants; - + $codeset = LOCALE_CODE_ALPHA_2; =head1 DESCRIPTION diff --git a/lib/Locale/Country.pm b/lib/Locale/Country.pm index f60b1352b2..ea446ee5d9 100644 --- a/lib/Locale/Country.pm +++ b/lib/Locale/Country.pm @@ -7,13 +7,13 @@ Locale::Country - ISO codes for country identification (ISO 3166) =head1 SYNOPSIS use Locale::Country; - + $country = code2country('jp'); # $country gets 'Japan' $code = country2code('Norway'); # $code gets 'no' - + @codes = all_country_codes(); @names = all_country_names(); - + # add "uk" as a pseudo country code for United Kingdom Locale::Country::_alias_code('uk' => 'gb'); @@ -285,7 +285,7 @@ an ISO standard. If you would like 'uk' to work as the two-letter code for United Kingdom, use the following: use Locale::Country; - + Locale::Country::_alias_code('uk' => 'gb'); With this code, both "uk" and "gb" are valid codes for United Kingdom, @@ -325,7 +325,7 @@ The user is prompted for a country code, and then told the corresponding country name: $| = 1; # turn off buffering - + print "Enter country code: "; chop($code = <STDIN>); $country = code2country($code, LOCALE_CODE_ALPHA_2); diff --git a/lib/Locale/Language.pm b/lib/Locale/Language.pm index 391cffab78..c561157deb 100644 --- a/lib/Locale/Language.pm +++ b/lib/Locale/Language.pm @@ -7,10 +7,10 @@ Locale::Language - ISO two letter codes for language identification (ISO 639) =head1 SYNOPSIS use Locale::Language; - + $lang = code2language('en'); # $lang gets 'English' $code = language2code('French'); # $code gets 'fr' - + @codes = all_language_codes(); @names = all_language_names(); @@ -173,7 +173,7 @@ The user is prompted for a language code, and then told the corresponding language name: $| = 1; # turn off buffering - + print "Enter language code: "; chop($code = <STDIN>); $lang = code2language($code); |