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/Language.pm | |
| 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/Language.pm')
| -rw-r--r-- | lib/Locale/Language.pm | 6 |
1 files changed, 3 insertions, 3 deletions
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); |