File Coverage

blib/lib/Locale/Codes/Constants.pm
Criterion Covered Total %
statement 108 108 100.0
branch n/a
condition n/a
subroutine 36 36 100.0
pod n/a
total 144 144 100.0


line stmt bran cond sub pod time code
1             package Locale::Codes::Constants;
2             # Copyright (C) 2001 Canon Research Centre Europe (CRE).
3             # Copyright (C) 2002-2009 Neil Bowers
4             # Copyright (c) 2010-2023 Sullivan Beck
5             # This program is free software; you can redistribute it and/or modify it
6             # under the same terms as Perl itself.
7              
8             # This file was automatically generated. Any changes to this file will
9             # be lost the next time 'gen_mods' is run.
10             # Generated on: Wed Jun 7 11:50:23 EDT 2023
11              
12 19     19   107 use strict;
  19         28  
  19         443  
13 19     19   83 use warnings;
  19         33  
  19         537  
14             require 5.006;
15 19     19   82 use Exporter qw(import);
  19         39  
  19         4449  
16              
17             our($VERSION,@EXPORT);
18             $VERSION = '3.74';
19              
20             ################################################################################
21             our(@CONSTANTS,%ALL_CODESETS);
22              
23             our(@CONSTANTS_COUNTRY) = qw(
24             LOCALE_CODE_ALPHA_2
25             LOCALE_CODE_ALPHA_3
26             LOCALE_CODE_DOM
27             LOCALE_CODE_GENC_ALPHA_2
28             LOCALE_CODE_GENC_ALPHA_3
29             LOCALE_CODE_GENC_NUMERIC
30             LOCALE_CODE_NUMERIC
31             LOCALE_CODE_UN_ALPHA_3
32             LOCALE_CODE_UN_NUMERIC
33             LOCALE_COUNTRY_ALPHA_2
34             LOCALE_COUNTRY_ALPHA_3
35             LOCALE_COUNTRY_DOM
36             LOCALE_COUNTRY_GENC_ALPHA_2
37             LOCALE_COUNTRY_GENC_ALPHA_3
38             LOCALE_COUNTRY_GENC_NUMERIC
39             LOCALE_COUNTRY_NUMERIC
40             LOCALE_COUNTRY_UN_ALPHA_3
41             LOCALE_COUNTRY_UN_NUMERIC
42             );
43             push(@CONSTANTS,@CONSTANTS_COUNTRY);
44              
45             our(@CONSTANTS_CURRENCY) = qw(
46             LOCALE_CURRENCY_ALPHA
47             LOCALE_CURRENCY_NUMERIC
48             LOCALE_CURR_ALPHA
49             LOCALE_CURR_NUMERIC
50             );
51             push(@CONSTANTS,@CONSTANTS_CURRENCY);
52              
53             our(@CONSTANTS_LANGEXT) = qw(
54             LOCALE_LANGEXT_ALPHA
55             );
56             push(@CONSTANTS,@CONSTANTS_LANGEXT);
57              
58             our(@CONSTANTS_LANGFAM) = qw(
59             LOCALE_LANGFAM_ALPHA
60             );
61             push(@CONSTANTS,@CONSTANTS_LANGFAM);
62              
63             our(@CONSTANTS_LANGUAGE) = qw(
64             LOCALE_LANGUAGE_ALPHA_2
65             LOCALE_LANGUAGE_ALPHA_3
66             LOCALE_LANGUAGE_TERM
67             LOCALE_LANG_ALPHA_2
68             LOCALE_LANG_ALPHA_3
69             LOCALE_LANG_TERM
70             );
71             push(@CONSTANTS,@CONSTANTS_LANGUAGE);
72              
73             our(@CONSTANTS_LANGVAR) = qw(
74             LOCALE_LANGVAR_ALPHA
75             );
76             push(@CONSTANTS,@CONSTANTS_LANGVAR);
77              
78             our(@CONSTANTS_SCRIPT) = qw(
79             LOCALE_SCRIPT_ALPHA
80             LOCALE_SCRIPT_NUMERIC
81             );
82             push(@CONSTANTS,@CONSTANTS_SCRIPT);
83              
84             @EXPORT = (@CONSTANTS,
85             qw(
86             %ALL_CODESETS
87             ));
88              
89 19     19   116 use constant LOCALE_CODE_ALPHA_2 => 'alpha-2';
  19         33  
  19         1784  
90 19     19   118 use constant LOCALE_CODE_ALPHA_3 => 'alpha-3';
  19         46  
  19         962  
91 19     19   124 use constant LOCALE_CODE_DOM => 'dom';
  19         24  
  19         844  
92 19     19   95 use constant LOCALE_CODE_GENC_ALPHA_2 => 'genc-alpha-2';
  19         37  
  19         839  
93 19     19   97 use constant LOCALE_CODE_GENC_ALPHA_3 => 'genc-alpha-3';
  19         31  
  19         757  
94 19     19   211 use constant LOCALE_CODE_GENC_NUMERIC => 'genc-numeric';
  19         34  
  19         781  
95 19     19   100 use constant LOCALE_CODE_NUMERIC => 'numeric';
  19         31  
  19         820  
96 19     19   107 use constant LOCALE_CODE_UN_ALPHA_3 => 'un-alpha-3';
  19         30  
  19         730  
97 19     19   92 use constant LOCALE_CODE_UN_NUMERIC => 'un-numeric';
  19         27  
  19         760  
98 19     19   103 use constant LOCALE_COUNTRY_ALPHA_2 => 'alpha-2';
  19         32  
  19         982  
99 19     19   103 use constant LOCALE_COUNTRY_ALPHA_3 => 'alpha-3';
  19         29  
  19         817  
100 19     19   96 use constant LOCALE_COUNTRY_DOM => 'dom';
  19         28  
  19         810  
101 19     19   96 use constant LOCALE_COUNTRY_GENC_ALPHA_2 => 'genc-alpha-2';
  19         32  
  19         746  
102 19     19   87 use constant LOCALE_COUNTRY_GENC_ALPHA_3 => 'genc-alpha-3';
  19         36  
  19         735  
103 19     19   93 use constant LOCALE_COUNTRY_GENC_NUMERIC => 'genc-numeric';
  19         44  
  19         869  
104 19     19   94 use constant LOCALE_COUNTRY_NUMERIC => 'numeric';
  19         45  
  19         832  
105 19     19   101 use constant LOCALE_COUNTRY_UN_ALPHA_3 => 'un-alpha-3';
  19         34  
  19         843  
106 19     19   113 use constant LOCALE_COUNTRY_UN_NUMERIC => 'un-numeric';
  19         38  
  19         1931  
107              
108             $ALL_CODESETS{'country'} =
109             {
110             'default' => 'alpha-2',
111             'module' => 'Country',
112             'codesets' => {
113             'alpha-2' => ['lc'],
114             'alpha-3' => ['lc'],
115             'dom' => ['lc'],
116             'genc-alpha-2' => ['uc'],
117             'genc-alpha-3' => ['uc'],
118             'genc-numeric' => ['numeric',3],
119             'numeric' => ['numeric',3],
120             'un-alpha-3' => ['uc'],
121             'un-numeric' => ['numeric',3],
122             }
123             };
124              
125 19     19   114 use constant LOCALE_CURRENCY_ALPHA => 'alpha';
  19         33  
  19         836  
126 19     19   94 use constant LOCALE_CURRENCY_NUMERIC => 'num';
  19         32  
  19         730  
127 19     19   87 use constant LOCALE_CURR_ALPHA => 'alpha';
  19         31  
  19         745  
128 19     19   93 use constant LOCALE_CURR_NUMERIC => 'num';
  19         37  
  19         1270  
129              
130             $ALL_CODESETS{'currency'} =
131             {
132             'default' => 'alpha',
133             'module' => 'Currency',
134             'codesets' => {
135             'alpha' => ['uc'],
136             'num' => ['numeric',3],
137             }
138             };
139              
140 19     19   98 use constant LOCALE_LANGEXT_ALPHA => 'alpha';
  19         44  
  19         1078  
141              
142             $ALL_CODESETS{'langext'} =
143             {
144             'default' => 'alpha',
145             'module' => 'LangExt',
146             'codesets' => {
147             'alpha' => ['lc'],
148             }
149             };
150              
151 19     19   97 use constant LOCALE_LANGFAM_ALPHA => 'alpha';
  19         29  
  19         1112  
152              
153             $ALL_CODESETS{'langfam'} =
154             {
155             'default' => 'alpha',
156             'module' => 'LangFam',
157             'codesets' => {
158             'alpha' => ['lc'],
159             }
160             };
161              
162 19     19   96 use constant LOCALE_LANGUAGE_ALPHA_2 => 'alpha-2';
  19         26  
  19         760  
163 19     19   92 use constant LOCALE_LANGUAGE_ALPHA_3 => 'alpha-3';
  19         28  
  19         2064  
164 19     19   86 use constant LOCALE_LANGUAGE_TERM => 'term';
  19         35  
  19         733  
165 19     19   92 use constant LOCALE_LANG_ALPHA_2 => 'alpha-2';
  19         61  
  19         770  
166 19     19   102 use constant LOCALE_LANG_ALPHA_3 => 'alpha-3';
  19         26  
  19         807  
167 19     19   91 use constant LOCALE_LANG_TERM => 'term';
  19         26  
  19         1164  
168              
169             $ALL_CODESETS{'language'} =
170             {
171             'default' => 'alpha-2',
172             'module' => 'Language',
173             'codesets' => {
174             'alpha-2' => ['lc'],
175             'alpha-3' => ['lc'],
176             'term' => ['lc'],
177             }
178             };
179              
180 19     19   112 use constant LOCALE_LANGVAR_ALPHA => 'alpha';
  19         32  
  19         1106  
181              
182             $ALL_CODESETS{'langvar'} =
183             {
184             'default' => 'alpha',
185             'module' => 'LangVar',
186             'codesets' => {
187             'alpha' => ['lc'],
188             }
189             };
190              
191 19     19   96 use constant LOCALE_SCRIPT_ALPHA => 'alpha';
  19         26  
  19         740  
192 19     19   131 use constant LOCALE_SCRIPT_NUMERIC => 'num';
  19         26  
  19         1669  
193              
194             $ALL_CODESETS{'script'} =
195             {
196             'default' => 'alpha',
197             'module' => 'Script',
198             'codesets' => {
199             'alpha' => ['ucfirst'],
200             'num' => ['numeric',3],
201             }
202             };
203              
204              
205             1;