NAME

country6.pl - Demonstration of Locales::Country Functional Usage.

SYNOPSIS

./country6.pl

DESCRIPTION

This is the same script as country5.pl but with functional usage demonstrated.

This is a simple demonstration script that shows how the top level Locales::Country module will override the environment LC_ALL setting at import time. Methods for resetting the default locale are also demonstrated. For example:

  $ENV{LC_ALL} = "de";            # reset environment locale.

  use Locales::Country ( "am" );  # override environment locale.

  print Locales::Country::getLocale, " => ", code2country ( "gb" ), "\n";

  Locales::Country::setLocale ( "fr" );
  print Locales::Country::getLocale, " => ", code2country ( "gb" ), "\n";

  Locales::Country::setLocale;    # no arg returns to import setting
  print Locales::Country::getLocale, " => ", code2country ( "gb" ), "\n";

AUTHOR

Daniel Yacob, dyacob@cpan.org

SEE ALSO

Locales::Country