lib/Locale/Constants.pm

   1 package Locale::Constants;
   2 #
   3 # Locale::Constants - defined constants for identifying codesets
   4 #
   5 # $Id: Constants.pm,v 1.1 2001/03/04 17:58:15 neilb Exp $
   6 #
   7
   8 use strict;
   9
  10 require Exporter;
  11
  12 use vars qw($VERSION @ISA @EXPORT);
  13 @ISA    = qw(Exporter);
  14 @EXPORT = qw(LOCALE_CODE_ALPHA_2 LOCALE_CODE_ALPHA_3 LOCALE_CODE_NUMERIC
  15                 LOCALE_CODE_DEFAULT);
  16
  17 use constant LOCALE_CODE_ALPHA_2 => 1;
  18 use constant LOCALE_CODE_ALPHA_3 => 2;
  19 use constant LOCALE_CODE_NUMERIC => 3;
  20
  21 use constant LOCALE_CODE_DEFAULT => LOCALE_CODE_ALPHA_2;
  22
  23 1;
  24
  25 __END__
  26
  27 =head1 NAME
  28
  29 Locale::Constants - constants for Locale codes
  30
  31 =head1 SYNOPSIS
  32
  33     use Locale::Constants;
  34
  35     $codeset = LOCALE_CODE_ALPHA_2;
  36
  37 =head1 DESCRIPTION
  38
  39 B<Locale::Constants> defines symbols which are used in
  40 the three modules from the Locale-Codes distribution:
  41
  42         Locale::Language
  43         Locale::Country
  44         Locale::Currency
  45
  46 B<Note:> at the moment only Locale::Country supports
  47 more than one code set.
  48
  49 The symbols defined are used to specify which codes you
  50 want to be used:
  51
  52         LOCALE_CODE_ALPHA_2
  53         LOCALE_CODE_ALPHA_3
  54         LOCALE_CODE_NUMERIC
  55
  56 You shouldn't have to C<use> this module directly yourself -
  57 it is used by the three Locale modules, which in turn export
  58 the symbols.
  59
  60 =head1 KNOWN BUGS AND LIMITATIONS
  61
  62 None at the moment.
  63
  64 =head1 SEE ALSO
  65
  66 =over 4
  67
  68 =item Locale::Language
  69
  70 Codes for identification of languages.
  71
  72 =item Locale::Country
  73
  74 Codes for identification of countries.
  75
  76 =item Locale::Currency
  77
  78 Codes for identification of currencies and funds.
  79
  80 =back
  81
  82 =head1 AUTHOR
  83
  84 Neil Bowers E<lt>neilb@cre.canon.co.ukE<gt>
  85
  86 =head1 COPYRIGHT
  87
  88 Copyright (C) 2001, Canon Research Centre Europe (CRE).
  89
  90 This module is free software; you can redistribute it and/or
  91 modify it under the same terms as Perl itself.
  92
  93 =cut
  94