line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package # |
2
|
|
|
|
|
|
|
Locale::Codes::Currency_Retired; |
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
# This file was automatically generated. Any changes to this file will |
5
|
|
|
|
|
|
|
# be lost the next time 'deprecate_codes' is run. |
6
|
|
|
|
|
|
|
# Generated on: Wed Jun 7 11:51:52 EDT 2023 |
7
|
|
|
|
|
|
|
|
8
|
3
|
|
|
3
|
|
16
|
use strict; |
|
3
|
|
|
|
|
6
|
|
|
3
|
|
|
|
|
89
|
|
9
|
|
|
|
|
|
|
require 5.006; |
10
|
3
|
|
|
3
|
|
12
|
use warnings; |
|
3
|
|
|
|
|
5
|
|
|
3
|
|
|
|
|
59
|
|
11
|
3
|
|
|
3
|
|
10
|
use utf8; |
|
3
|
|
|
|
|
6
|
|
|
3
|
|
|
|
|
13
|
|
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
our($VERSION); |
14
|
|
|
|
|
|
|
$VERSION='3.74'; |
15
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
$Locale::Codes::Retired{'currency'}{'alpha'}{'code'} = { |
17
|
|
|
|
|
|
|
q(ADP) => q(Andorran Peseta), |
18
|
|
|
|
|
|
|
q(AFA) => q(Afghani), |
19
|
|
|
|
|
|
|
q(AON) => q(New Kwanza), |
20
|
|
|
|
|
|
|
q(AOR) => q(Kwanza Reajustado), |
21
|
|
|
|
|
|
|
q(ATS) => q(Schilling), |
22
|
|
|
|
|
|
|
q(AZM) => q(Azerbaijanian Manat), |
23
|
|
|
|
|
|
|
q(BEF) => q(Belgian Franc), |
24
|
|
|
|
|
|
|
q(BGL) => q(Lev), |
25
|
|
|
|
|
|
|
q(BYB) => q(Belarussian Ruble), |
26
|
|
|
|
|
|
|
q(CYP) => q(Cyprus Pound), |
27
|
|
|
|
|
|
|
q(DEM) => q(German Mark), |
28
|
|
|
|
|
|
|
q(ECS) => q(Sucre), |
29
|
|
|
|
|
|
|
q(ECV) => q(Unidad de Valor Constante (UVC)), |
30
|
|
|
|
|
|
|
q(EEK) => q(Kroon), |
31
|
|
|
|
|
|
|
q(ESP) => q(Spanish Peseta), |
32
|
|
|
|
|
|
|
q(FIM) => q(Markka), |
33
|
|
|
|
|
|
|
q(FRF) => q(French Franc), |
34
|
|
|
|
|
|
|
q(GHC) => q(Cedi), |
35
|
|
|
|
|
|
|
q(GRD) => q(Drachma), |
36
|
|
|
|
|
|
|
q(GWP) => q(Guinea-Bissau Peso), |
37
|
|
|
|
|
|
|
q(HRK) => q(Kuna), |
38
|
|
|
|
|
|
|
q(IEP) => q(Irish Pound), |
39
|
|
|
|
|
|
|
q(ITL) => q(Italian Lira), |
40
|
|
|
|
|
|
|
q(LTL) => q(Lithuanian Litas), |
41
|
|
|
|
|
|
|
q(LUF) => q(Luxembourg Franc), |
42
|
|
|
|
|
|
|
q(LVL) => q(Latvian Lats), |
43
|
|
|
|
|
|
|
q(MGF) => q(Malagasy Franc), |
44
|
|
|
|
|
|
|
q(MRO) => q(Ouguiya), |
45
|
|
|
|
|
|
|
q(MTL) => q(Maltese Lira), |
46
|
|
|
|
|
|
|
q(MZM) => q(Metical), |
47
|
|
|
|
|
|
|
q(NLG) => q(Netherlands Guilder), |
48
|
|
|
|
|
|
|
q(PTE) => q(Portuguese Escudo), |
49
|
|
|
|
|
|
|
q(ROL) => q(Leu), |
50
|
|
|
|
|
|
|
q(RUR) => q(Russian Ruble), |
51
|
|
|
|
|
|
|
q(SDD) => q(Sudanese Dinar), |
52
|
|
|
|
|
|
|
q(SHP) => q(Saint Helena Pound), |
53
|
|
|
|
|
|
|
q(SIT) => q(Tolar), |
54
|
|
|
|
|
|
|
q(SKK) => q(Slovak Koruna), |
55
|
|
|
|
|
|
|
q(SRG) => q(Surinam Guilder), |
56
|
|
|
|
|
|
|
q(STD) => q(Dobra), |
57
|
|
|
|
|
|
|
q(TJR) => q(Tajik Ruble), |
58
|
|
|
|
|
|
|
q(TMM) => q(Manat), |
59
|
|
|
|
|
|
|
q(TPE) => q(Timor Escudo), |
60
|
|
|
|
|
|
|
q(TRL) => q(Turkish Lira), |
61
|
|
|
|
|
|
|
q(UAK) => q(Karbovanets), |
62
|
|
|
|
|
|
|
q(USS) => q(US Dollar (Same day)), |
63
|
|
|
|
|
|
|
q(VEB) => q(Bolivar), |
64
|
|
|
|
|
|
|
q(VEF) => q(Bolivar), |
65
|
|
|
|
|
|
|
q(XB5) => q(European Unit of Account 17), |
66
|
|
|
|
|
|
|
q(XEU) => q(ECU (until 1998-12-31)), |
67
|
|
|
|
|
|
|
q(XFO) => q(Gold-Franc), |
68
|
|
|
|
|
|
|
q(XFU) => q(UIC-Franc), |
69
|
|
|
|
|
|
|
q(YUM) => q(New Dinar), |
70
|
|
|
|
|
|
|
q(ZAL) => q(Financial Rand), |
71
|
|
|
|
|
|
|
q(ZRN) => q(New Zaire), |
72
|
|
|
|
|
|
|
q(ZWD) => q(Zimbabwe Dollar), |
73
|
|
|
|
|
|
|
}; |
74
|
|
|
|
|
|
|
|
75
|
|
|
|
|
|
|
$Locale::Codes::Retired{'currency'}{'num'}{'code'} = { |
76
|
|
|
|
|
|
|
q(191) => q(Kuna), |
77
|
|
|
|
|
|
|
q(428) => q(Latvian Lats), |
78
|
|
|
|
|
|
|
q(440) => q(Lithuanian Litas), |
79
|
|
|
|
|
|
|
q(478) => q(Ouguiya), |
80
|
|
|
|
|
|
|
q(654) => q(Saint Helena Pound), |
81
|
|
|
|
|
|
|
q(678) => q(Dobra), |
82
|
|
|
|
|
|
|
q(937) => q(Bolivar), |
83
|
|
|
|
|
|
|
q(998) => q(US Dollar (Same day)), |
84
|
|
|
|
|
|
|
}; |
85
|
|
|
|
|
|
|
|
86
|
|
|
|
|
|
|
$Locale::Codes::Retired{'currency'}{'alpha'}{'name'} = { |
87
|
|
|
|
|
|
|
q(andorran peseta) => [ q(ADP), q(Andorran Peseta) ], |
88
|
|
|
|
|
|
|
q(aruban guilder) => [ q(AWG), q(Aruban Guilder) ], |
89
|
|
|
|
|
|
|
q(azerbaijanian manat) => [ q(AZN), q(Azerbaijanian Manat) ], |
90
|
|
|
|
|
|
|
q(belarussian ruble) => [ q(BYR), q(Belarussian Ruble) ], |
91
|
|
|
|
|
|
|
q(belgian franc) => [ q(BEF), q(Belgian Franc) ], |
92
|
|
|
|
|
|
|
q(bermudian dollar (customarily known as bermuda dollar)) => [ q(BMD), q(Bermudian Dollar (customarily known as Bermuda Dollar)) ], |
93
|
|
|
|
|
|
|
q(bolivar) => [ q(VEF), q(Bolivar) ], |
94
|
|
|
|
|
|
|
q(bolivar fuerte) => [ q(VEF), q(Bolivar Fuerte) ], |
95
|
|
|
|
|
|
|
q(bond markets units european composite unit (eurco)) => [ q(XBA), q(Bond Markets Units European Composite Unit (EURCO)) ], |
96
|
|
|
|
|
|
|
q(candian dollar) => [ q(CAD), q(Candian Dollar) ], |
97
|
|
|
|
|
|
|
q(cape verde escudo) => [ q(CVE), q(Cape Verde Escudo) ], |
98
|
|
|
|
|
|
|
q(cedi) => [ q(GHS), q(Cedi) ], |
99
|
|
|
|
|
|
|
q(comoro franc) => [ q(KMF), q(Comoro Franc) ], |
100
|
|
|
|
|
|
|
q(convertible marks) => [ q(BAM), q(Convertible Marks) ], |
101
|
|
|
|
|
|
|
q(croatian kuna) => [ q(HRK), q(Croatian Kuna) ], |
102
|
|
|
|
|
|
|
q(cyprus pound) => [ q(CYP), q(Cyprus Pound) ], |
103
|
|
|
|
|
|
|
q(dinar) => [ q(BHD), q(Dinar) ], |
104
|
|
|
|
|
|
|
q(drachma) => [ q(GRD), q(Drachma) ], |
105
|
|
|
|
|
|
|
q(ecu (until 1998-12-31)) => [ q(XEU), q(ECU (until 1998-12-31)) ], |
106
|
|
|
|
|
|
|
q(european composite unit) => [ q(XBA), q(European Composite Unit) ], |
107
|
|
|
|
|
|
|
q(european monetary unit) => [ q(XBB), q(European Monetary Unit) ], |
108
|
|
|
|
|
|
|
q(european monetary unit (e.m.u.-6)) => [ q(XBB), q(European Monetary Unit (E.M.U.-6)) ], |
109
|
|
|
|
|
|
|
q(european unit of account 17) => [ q(XB5), q(European Unit of Account 17) ], |
110
|
|
|
|
|
|
|
q(european unit of account 17(e.u.a.-17)) => [ q(XBD), q(European Unit of Account 17(E.U.A.-17)) ], |
111
|
|
|
|
|
|
|
q(european unit of account 9) => [ q(XBC), q(European Unit of Account 9) ], |
112
|
|
|
|
|
|
|
q(european unit of account 9(e.u.a.-9)) => [ q(XBC), q(European Unit of Account 9(E.U.A.-9)) ], |
113
|
|
|
|
|
|
|
q(financial rand) => [ q(ZAL), q(Financial Rand) ], |
114
|
|
|
|
|
|
|
q(franc congolais) => [ q(CDF), q(Franc Congolais) ], |
115
|
|
|
|
|
|
|
q(french franc) => [ q(FRF), q(French Franc) ], |
116
|
|
|
|
|
|
|
q(german mark) => [ q(DEM), q(German Mark) ], |
117
|
|
|
|
|
|
|
q(gold-franc) => [ q(XFO), q(Gold-Franc) ], |
118
|
|
|
|
|
|
|
q(guinea franc) => [ q(GNF), q(Guinea Franc) ], |
119
|
|
|
|
|
|
|
q(guinea-bissau peso) => [ q(GWP), q(Guinea-Bissau Peso) ], |
120
|
|
|
|
|
|
|
q(irish pound) => [ q(IEP), q(Irish Pound) ], |
121
|
|
|
|
|
|
|
q(italian lira) => [ q(ITL), q(Italian Lira) ], |
122
|
|
|
|
|
|
|
q(karbovanets) => [ q(UAK), q(Karbovanets) ], |
123
|
|
|
|
|
|
|
q(kip) => [ q(LAK), q(Kip) ], |
124
|
|
|
|
|
|
|
q(kroon) => [ q(EEK), q(Kroon) ], |
125
|
|
|
|
|
|
|
q(kuna) => [ q(HRK), q(Kuna) ], |
126
|
|
|
|
|
|
|
q(kwacha) => [ q(MWK), q(Kwacha) ], |
127
|
|
|
|
|
|
|
q(kwanza reajustado) => [ q(AOR), q(Kwanza Reajustado) ], |
128
|
|
|
|
|
|
|
q(latvian lats) => [ q(LVL), q(Latvian Lats) ], |
129
|
|
|
|
|
|
|
q(leu) => [ q(RON), q(Leu) ], |
130
|
|
|
|
|
|
|
q(lev) => [ q(BGL), q(Lev) ], |
131
|
|
|
|
|
|
|
q(lithuanian litas) => [ q(LTL), q(Lithuanian Litas) ], |
132
|
|
|
|
|
|
|
q(luxembourg franc) => [ q(LUF), q(Luxembourg Franc) ], |
133
|
|
|
|
|
|
|
q(malagasy franc) => [ q(MGF), q(Malagasy Franc) ], |
134
|
|
|
|
|
|
|
q(maltese lira) => [ q(MTL), q(Maltese Lira) ], |
135
|
|
|
|
|
|
|
q(manat) => [ q(TMT), q(Manat) ], |
136
|
|
|
|
|
|
|
q(markka) => [ q(FIM), q(Markka) ], |
137
|
|
|
|
|
|
|
q(metical) => [ q(MZN), q(Metical) ], |
138
|
|
|
|
|
|
|
q(mexican nuevo peso) => [ q(MXN), q(Mexican Nuevo Peso) ], |
139
|
|
|
|
|
|
|
q(netherlands antillian guilder) => [ q(ANG), q(Netherlands Antillian Guilder) ], |
140
|
|
|
|
|
|
|
q(netherlands guilder) => [ q(NLG), q(Netherlands Guilder) ], |
141
|
|
|
|
|
|
|
q(new dinar) => [ q(YUM), q(New Dinar) ], |
142
|
|
|
|
|
|
|
q(new kwanza) => [ q(AON), q(New Kwanza) ], |
143
|
|
|
|
|
|
|
q(new leu) => [ q(RON), q(New Leu) ], |
144
|
|
|
|
|
|
|
q(new manat) => [ q(TMT), q(New Manat) ], |
145
|
|
|
|
|
|
|
q(new romanian leu) => [ q(RON), q(New Romanian Leu) ], |
146
|
|
|
|
|
|
|
q(new zaire) => [ q(ZRN), q(New Zaire) ], |
147
|
|
|
|
|
|
|
q(nuevo sol) => [ q(PEN), q(Nuevo Sol) ], |
148
|
|
|
|
|
|
|
q(philippine peso) => [ q(PHP), q(Philippine Peso) ], |
149
|
|
|
|
|
|
|
q(philippine piso) => [ q(PHP), q(Philippine Piso) ], |
150
|
|
|
|
|
|
|
q(portuguese escudo) => [ q(PTE), q(Portuguese Escudo) ], |
151
|
|
|
|
|
|
|
q(saint helena pound) => [ q(SHP), q(Saint Helena Pound) ], |
152
|
|
|
|
|
|
|
q(schilling) => [ q(ATS), q(Schilling) ], |
153
|
|
|
|
|
|
|
q(sdr) => [ q(XDR), q(SDR) ], |
154
|
|
|
|
|
|
|
q(shekel) => [ q(ILS), q(Shekel) ], |
155
|
|
|
|
|
|
|
q(slovak koruna) => [ q(SKK), q(Slovak Koruna) ], |
156
|
|
|
|
|
|
|
q(spanish peseta) => [ q(ESP), q(Spanish Peseta) ], |
157
|
|
|
|
|
|
|
q(st. helena pound) => [ q(SHP), q(St. Helena Pound) ], |
158
|
|
|
|
|
|
|
q(sudanese dinar) => [ q(SDD), q(Sudanese Dinar) ], |
159
|
|
|
|
|
|
|
q(surinam guilder) => [ q(SRG), q(Surinam Guilder) ], |
160
|
|
|
|
|
|
|
q(tajik ruble) => [ q(TJR), q(Tajik Ruble) ], |
161
|
|
|
|
|
|
|
q(timor escudo) => [ q(TPE), q(Timor Escudo) ], |
162
|
|
|
|
|
|
|
q(tolar) => [ q(SIT), q(Tolar) ], |
163
|
|
|
|
|
|
|
q(tunisian dollar) => [ q(TND), q(Tunisian Dollar) ], |
164
|
|
|
|
|
|
|
q(uic-franc) => [ q(XFU), q(UIC-Franc) ], |
165
|
|
|
|
|
|
|
q(unidad de valor constante (uvc)) => [ q(ECV), q(Unidad de Valor Constante (UVC)) ], |
166
|
|
|
|
|
|
|
q(unidades de fomento) => [ q(CLF), q(Unidades de fomento) ], |
167
|
|
|
|
|
|
|
q(unidades de formento) => [ q(CLF), q(Unidades de Formento) ], |
168
|
|
|
|
|
|
|
q(uruguay peso en unidades indexadas) => [ q(UYI), q(Uruguay Peso en Unidades Indexadas) ], |
169
|
|
|
|
|
|
|
q(uruguay peso en unidades indexadas (uruiurui)) => [ q(UYI), q(Uruguay Peso en Unidades Indexadas (URUIURUI)) ], |
170
|
|
|
|
|
|
|
q(us dollar (same day)) => [ q(USS), q(US Dollar (Same day)) ], |
171
|
|
|
|
|
|
|
}; |
172
|
|
|
|
|
|
|
|
173
|
|
|
|
|
|
|
$Locale::Codes::Retired{'currency'}{'num'}{'name'} = { |
174
|
|
|
|
|
|
|
q(azerbaijanian manat) => [ q(944), q(Azerbaijanian Manat) ], |
175
|
|
|
|
|
|
|
q(belarussian ruble) => [ q(974), q(Belarussian Ruble) ], |
176
|
|
|
|
|
|
|
q(bolivar) => [ q(937), q(Bolivar) ], |
177
|
|
|
|
|
|
|
q(bolivar fuerte) => [ q(937), q(Bolivar Fuerte) ], |
178
|
|
|
|
|
|
|
q(cape verde escudo) => [ q(132), q(Cape Verde Escudo) ], |
179
|
|
|
|
|
|
|
q(cedi) => [ q(936), q(Cedi) ], |
180
|
|
|
|
|
|
|
q(comoro franc) => [ q(174), q(Comoro Franc) ], |
181
|
|
|
|
|
|
|
q(croatian kuna) => [ q(191), q(Croatian Kuna) ], |
182
|
|
|
|
|
|
|
q(guinea franc) => [ q(324), q(Guinea Franc) ], |
183
|
|
|
|
|
|
|
q(kip) => [ q(418), q(Kip) ], |
184
|
|
|
|
|
|
|
q(kuna) => [ q(191), q(Kuna) ], |
185
|
|
|
|
|
|
|
q(kwacha) => [ q(454), q(Kwacha) ], |
186
|
|
|
|
|
|
|
q(latvian lats) => [ q(428), q(Latvian Lats) ], |
187
|
|
|
|
|
|
|
q(leu) => [ q(946), q(Leu) ], |
188
|
|
|
|
|
|
|
q(lithuanian litas) => [ q(440), q(Lithuanian Litas) ], |
189
|
|
|
|
|
|
|
q(metical) => [ q(943), q(Metical) ], |
190
|
|
|
|
|
|
|
q(new manat) => [ q(934), q(New Manat) ], |
191
|
|
|
|
|
|
|
q(new romanian leu) => [ q(946), q(New Romanian Leu) ], |
192
|
|
|
|
|
|
|
q(nuevo sol) => [ q(604), q(Nuevo Sol) ], |
193
|
|
|
|
|
|
|
q(philippine peso) => [ q(608), q(Philippine Peso) ], |
194
|
|
|
|
|
|
|
q(philippine piso) => [ q(608), q(Philippine Piso) ], |
195
|
|
|
|
|
|
|
q(saint helena pound) => [ q(654), q(Saint Helena Pound) ], |
196
|
|
|
|
|
|
|
q(unidades de fomento) => [ q(990), q(Unidades de fomento) ], |
197
|
|
|
|
|
|
|
q(uruguay peso en unidades indexadas (uruiurui)) => [ q(940), q(Uruguay Peso en Unidades Indexadas (URUIURUI)) ], |
198
|
|
|
|
|
|
|
q(us dollar (same day)) => [ q(998), q(US Dollar (Same day)) ], |
199
|
|
|
|
|
|
|
}; |
200
|
|
|
|
|
|
|
|
201
|
|
|
|
|
|
|
|
202
|
|
|
|
|
|
|
1; |