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; |