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: Tue Aug 29 10:59:57 EDT 2023
11              
12 19     19   129 use strict;
  19         35  
  19         533  
13 19     19   91 use warnings;
  19         36  
  19         616  
14             require 5.006;
15 19     19   131 use Exporter qw(import);
  19         35  
  19         5807  
16              
17             our($VERSION,@EXPORT);
18             $VERSION = '3.75';
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   181 use constant LOCALE_CODE_ALPHA_2 => 'alpha-2';
  19         60  
  19         2352  
90 19     19   139 use constant LOCALE_CODE_ALPHA_3 => 'alpha-3';
  19         45  
  19         1127  
91 19     19   121 use constant LOCALE_CODE_DOM => 'dom';
  19         35  
  19         1007  
92 19     19   107 use constant LOCALE_CODE_GENC_ALPHA_2 => 'genc-alpha-2';
  19         38  
  19         1049  
93 19     19   127 use constant LOCALE_CODE_GENC_ALPHA_3 => 'genc-alpha-3';
  19         48  
  19         1088  
94 19     19   266 use constant LOCALE_CODE_GENC_NUMERIC => 'genc-numeric';
  19         50  
  19         1021  
95 19     19   126 use constant LOCALE_CODE_NUMERIC => 'numeric';
  19         32  
  19         960  
96 19     19   150 use constant LOCALE_CODE_UN_ALPHA_3 => 'un-alpha-3';
  19         50  
  19         1025  
97 19     19   120 use constant LOCALE_CODE_UN_NUMERIC => 'un-numeric';
  19         57  
  19         934  
98 19     19   125 use constant LOCALE_COUNTRY_ALPHA_2 => 'alpha-2';
  19         46  
  19         1126  
99 19     19   113 use constant LOCALE_COUNTRY_ALPHA_3 => 'alpha-3';
  19         31  
  19         985  
100 19     19   110 use constant LOCALE_COUNTRY_DOM => 'dom';
  19         34  
  19         1024  
101 19     19   113 use constant LOCALE_COUNTRY_GENC_ALPHA_2 => 'genc-alpha-2';
  19         54  
  19         1051  
102 19     19   123 use constant LOCALE_COUNTRY_GENC_ALPHA_3 => 'genc-alpha-3';
  19         45  
  19         1034  
103 19     19   128 use constant LOCALE_COUNTRY_GENC_NUMERIC => 'genc-numeric';
  19         90  
  19         1047  
104 19     19   124 use constant LOCALE_COUNTRY_NUMERIC => 'numeric';
  19         96  
  19         1042  
105 19     19   137 use constant LOCALE_COUNTRY_UN_ALPHA_3 => 'un-alpha-3';
  19         45  
  19         989  
106 19     19   110 use constant LOCALE_COUNTRY_UN_NUMERIC => 'un-numeric';
  19         44  
  19         2375  
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   129 use constant LOCALE_CURRENCY_ALPHA => 'alpha';
  19         37  
  19         1094  
126 19     19   114 use constant LOCALE_CURRENCY_NUMERIC => 'num';
  19         43  
  19         964  
127 19     19   120 use constant LOCALE_CURR_ALPHA => 'alpha';
  19         32  
  19         2791  
128 19     19   139 use constant LOCALE_CURR_NUMERIC => 'num';
  19         32  
  19         1424  
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   140 use constant LOCALE_LANGEXT_ALPHA => 'alpha';
  19         35  
  19         1403  
141              
142             $ALL_CODESETS{'langext'} =
143             {
144             'default' => 'alpha',
145             'module' => 'LangExt',
146             'codesets' => {
147             'alpha' => ['lc'],
148             }
149             };
150              
151 19     19   112 use constant LOCALE_LANGFAM_ALPHA => 'alpha';
  19         47  
  19         1320  
152              
153             $ALL_CODESETS{'langfam'} =
154             {
155             'default' => 'alpha',
156             'module' => 'LangFam',
157             'codesets' => {
158             'alpha' => ['lc'],
159             }
160             };
161              
162 19     19   119 use constant LOCALE_LANGUAGE_ALPHA_2 => 'alpha-2';
  19         31  
  19         912  
163 19     19   103 use constant LOCALE_LANGUAGE_ALPHA_3 => 'alpha-3';
  19         33  
  19         1000  
164 19     19   113 use constant LOCALE_LANGUAGE_TERM => 'term';
  19         43  
  19         993  
165 19     19   116 use constant LOCALE_LANG_ALPHA_2 => 'alpha-2';
  19         41  
  19         1055  
166 19     19   116 use constant LOCALE_LANG_ALPHA_3 => 'alpha-3';
  19         34  
  19         1069  
167 19     19   125 use constant LOCALE_LANG_TERM => 'term';
  19         33  
  19         1509  
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   125 use constant LOCALE_LANGVAR_ALPHA => 'alpha';
  19         41  
  19         1337  
181              
182             $ALL_CODESETS{'langvar'} =
183             {
184             'default' => 'alpha',
185             'module' => 'LangVar',
186             'codesets' => {
187             'alpha' => ['lc'],
188             }
189             };
190              
191 19     19   113 use constant LOCALE_SCRIPT_ALPHA => 'alpha';
  19         46  
  19         1017  
192 19     19   115 use constant LOCALE_SCRIPT_NUMERIC => 'num';
  19         49  
  19         2035  
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;