File Coverage

blib/lib/Geo/Region/Constant.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package Geo::Region::Constant;
2              
3 2     2   64209 use v5.8.1;
  2         5  
  2         59  
4 2     2   7 use utf8;
  2         2  
  2         17  
5 2     2   37 use strict;
  2         2  
  2         45  
6 2     2   4 use warnings;
  2         3  
  2         47  
7 2     2   743 use parent 'Exporter';
  2         419  
  2         7  
8              
9             use constant {
10             # region
11 2         2976 AFRICA => '002',
12             AMERICAS => '019',
13             ASIA => '142',
14             AUSTRALASIA => '053',
15             CARIBBEAN => '029',
16             CENTRAL_AMERICA => '013',
17             CENTRAL_ASIA => '143',
18             EASTERN_AFRICA => '014',
19             EASTERN_ASIA => '030',
20             EASTERN_EUROPE => '151',
21             EUROPE => '150',
22             EUROPEAN_UNION => 'EU',
23             LATIN_AMERICA => '419',
24             MELANESIA => '054',
25             MICRONESIAN_REGION => '057',
26             MIDDLE_AFRICA => '017',
27             NORTH_AMERICA => '003',
28             NORTHERN_AFRICA => '015',
29             NORTHERN_AMERICA => '021',
30             NORTHERN_EUROPE => '154',
31             OCEANIA => '009',
32             OUTLYING_OCEANIA => 'QO',
33             POLYNESIA => '061',
34             SOUTH_AMERICA => '005',
35             SOUTHEAST_ASIA => '035',
36             SOUTHERN_AFRICA => '018',
37             SOUTHERN_ASIA => '034',
38             SOUTHERN_EUROPE => '039',
39             WESTERN_AFRICA => '011',
40             WESTERN_ASIA => '145',
41             WESTERN_EUROPE => '155',
42             WORLD => '001',
43              
44             # country
45             AFGHANISTAN => 'AF',
46             ALAND_ISLANDS => 'AX',
47             ALBANIA => 'AL',
48             ALGERIA => 'DZ',
49             AMERICAN_SAMOA => 'AS',
50             ANDORRA => 'AD',
51             ANGOLA => 'AO',
52             ANGUILLA => 'AI',
53             ANTARCTICA => 'AQ',
54             ANTIGUA_BARBUDA => 'AG',
55             ARGENTINA => 'AR',
56             ARMENIA => 'AM',
57             ARUBA => 'AW',
58             AUSTRALIA => 'AU',
59             AUSTRIA => 'AT',
60             AZERBAIJAN => 'AZ',
61             BAHAMAS => 'BS',
62             BAHRAIN => 'BH',
63             BANGLADESH => 'BD',
64             BARBADOS => 'BB',
65             BELARUS => 'BY',
66             BELGIUM => 'BE',
67             BELIZE => 'BZ',
68             BENIN => 'BJ',
69             BERMUDA => 'BM',
70             BHUTAN => 'BT',
71             BOLIVIA => 'BO',
72             BOSNIA => 'BA',
73             BOTSWANA => 'BW',
74             BOUVET_ISLAND => 'BV',
75             BRAZIL => 'BR',
76             BRITISH_INDIAN_OCEAN_TERRITORY => 'IO',
77             BRITISH_VIRGIN_ISLANDS => 'VG',
78             BRUNEI => 'BN',
79             BULGARIA => 'BG',
80             BURKINA_FASO => 'BF',
81             BURUNDI => 'BI',
82             CAMBODIA => 'KH',
83             CAMEROON => 'CM',
84             CANADA => 'CA',
85             CAPE_VERDE => 'CV',
86             CARIBBEAN_NETHERLANDS => 'BQ',
87             CAYMAN_ISLANDS => 'KY',
88             CENTRAL_AFRICAN_REPUBLIC => 'CF',
89             CHAD => 'TD',
90             CHILE => 'CL',
91             CHINA => 'CN',
92             CHRISTMAS_ISLAND => 'CX',
93             COCOS_ISLANDS => 'CC',
94             COLOMBIA => 'CO',
95             COMOROS => 'KM',
96             CONGO_DRC => 'CD',
97             CONGO_REPUBLIC => 'CG',
98             COOK_ISLANDS => 'CK',
99             COSTA_RICA => 'CR',
100             CROATIA => 'HR',
101             CUBA => 'CU',
102             CURACAO => 'CW',
103             CYPRUS => 'CY',
104             CZECH_REPUBLIC => 'CZ',
105             DENMARK => 'DK',
106             DJIBOUTI => 'DJ',
107             DOMINICA => 'DM',
108             DOMINICAN_REPUBLIC => 'DO',
109             EAST_TIMOR => 'TL',
110             ECUADOR => 'EC',
111             EGYPT => 'EG',
112             EL_SALVADOR => 'SV',
113             EQUATORIAL_GUINEA => 'GQ',
114             ERITREA => 'ER',
115             ESTONIA => 'EE',
116             ETHIOPIA => 'ET',
117             FALKLAND_ISLANDS => 'FK',
118             FAROE_ISLANDS => 'FO',
119             FIJI => 'FJ',
120             FINLAND => 'FI',
121             FRANCE => 'FR',
122             FRENCH_GUIANA => 'GF',
123             FRENCH_POLYNESIA => 'PF',
124             FRENCH_SOUTHERN_TERRITORIES => 'TF',
125             GABON => 'GA',
126             GAMBIA => 'GM',
127             GEORGIA => 'GE',
128             GERMANY => 'DE',
129             GHANA => 'GH',
130             GIBRALTAR => 'GI',
131             GREECE => 'GR',
132             GREENLAND => 'GL',
133             GRENADA => 'GD',
134             GUADELOUPE => 'GP',
135             GUAM => 'GU',
136             GUATEMALA => 'GT',
137             GUERNSEY => 'GG',
138             GUINEA => 'GN',
139             GUINEA_BISSAU => 'GW',
140             GUYANA => 'GY',
141             HAITI => 'HT',
142             HEARD_MCDONALD_ISLANDS => 'HM',
143             HONDURAS => 'HN',
144             HONG_KONG => 'HK',
145             HUNGARY => 'HU',
146             ICELAND => 'IS',
147             INDIA => 'IN',
148             INDONESIA => 'ID',
149             IRAN => 'IR',
150             IRAQ => 'IQ',
151             IRELAND => 'IE',
152             ISLE_OF_MAN => 'IM',
153             ISRAEL => 'IL',
154             ITALY => 'IT',
155             IVORY_COAST => 'CI',
156             JAMAICA => 'JM',
157             JAPAN => 'JP',
158             JERSEY => 'JE',
159             JORDAN => 'JO',
160             KAZAKHSTAN => 'KZ',
161             KENYA => 'KE',
162             KIRIBATI => 'KI',
163             KUWAIT => 'KW',
164             KYRGYZSTAN => 'KG',
165             LAOS => 'LA',
166             LATVIA => 'LV',
167             LEBANON => 'LB',
168             LESOTHO => 'LS',
169             LIBERIA => 'LR',
170             LIBYA => 'LY',
171             LIECHTENSTEIN => 'LI',
172             LITHUANIA => 'LT',
173             LUXEMBOURG => 'LU',
174             MACAU => 'MO',
175             MACEDONIA => 'MK',
176             MADAGASCAR => 'MG',
177             MALAWI => 'MW',
178             MALAYSIA => 'MY',
179             MALDIVES => 'MV',
180             MALI => 'ML',
181             MALTA => 'MT',
182             MARSHALL_ISLANDS => 'MH',
183             MARTINIQUE => 'MQ',
184             MAURITANIA => 'MR',
185             MAURITIUS => 'MU',
186             MAYOTTE => 'YT',
187             MEXICO => 'MX',
188             MICRONESIA => 'FM',
189             MOLDOVA => 'MD',
190             MONACO => 'MC',
191             MONGOLIA => 'MN',
192             MONTENEGRO => 'ME',
193             MONTSERRAT => 'MS',
194             MOROCCO => 'MA',
195             MOZAMBIQUE => 'MZ',
196             MYANMAR => 'MM',
197             NAMIBIA => 'NA',
198             NAURU => 'NR',
199             NEPAL => 'NP',
200             NETHERLANDS => 'NL',
201             NEW_CALEDONIA => 'NC',
202             NEW_ZEALAND => 'NZ',
203             NICARAGUA => 'NI',
204             NIGER => 'NE',
205             NIGERIA => 'NG',
206             NIUE => 'NU',
207             NORFOLK_ISLAND => 'NF',
208             NORTHERN_MARIANA_ISLANDS => 'MP',
209             NORTH_KOREA => 'KP',
210             NORWAY => 'NO',
211             OMAN => 'OM',
212             PAKISTAN => 'PK',
213             PALAU => 'PW',
214             PALESTINE => 'PS',
215             PANAMA => 'PA',
216             PAPUA_NEW_GUINEA => 'PG',
217             PARAGUAY => 'PY',
218             PERU => 'PE',
219             PHILIPPINES => 'PH',
220             PITCAIRN_ISLANDS => 'PN',
221             POLAND => 'PL',
222             PORTUGAL => 'PT',
223             PUERTO_RICO => 'PR',
224             QATAR => 'QA',
225             REUNION => 'RE',
226             ROMANIA => 'RO',
227             RUSSIA => 'RU',
228             RWANDA => 'RW',
229             SAMOA => 'WS',
230             SAN_MARINO => 'SM',
231             SAO_TOME_PRINCIPE => 'ST',
232             SAUDI_ARABIA => 'SA',
233             SENEGAL => 'SN',
234             SERBIA => 'RS',
235             SEYCHELLES => 'SC',
236             SIERRA_LEONE => 'SL',
237             SINGAPORE => 'SG',
238             SINT_MAARTEN => 'SX',
239             SLOVAKIA => 'SK',
240             SLOVENIA => 'SI',
241             SOLOMON_ISLANDS => 'SB',
242             SOMALIA => 'SO',
243             SOUTH_AFRICA => 'ZA',
244             SOUTH_GEORGIA_SOUTH_SANDWICH_ISLANDS => 'GS',
245             SOUTH_KOREA => 'KR',
246             SOUTH_SUDAN => 'SS',
247             SPAIN => 'ES',
248             SRI_LANKA => 'LK',
249             ST_BARTHELEMY => 'BL',
250             ST_HELENA => 'SH',
251             ST_KITTS_NEVIS => 'KN',
252             ST_LUCIA => 'LC',
253             ST_MARTIN => 'MF',
254             ST_PIERRE_MIQUELON => 'PM',
255             ST_VINCENT_GRENADINES => 'VC',
256             SUDAN => 'SD',
257             SURINAME => 'SR',
258             SVALBARD_JAN_MAYEN => 'SJ',
259             SWAZILAND => 'SZ',
260             SWEDEN => 'SE',
261             SWITZERLAND => 'CH',
262             SYRIA => 'SY',
263             TAIWAN => 'TW',
264             TAJIKISTAN => 'TJ',
265             TANZANIA => 'TZ',
266             THAILAND => 'TH',
267             TOGO => 'TG',
268             TOKELAU => 'TK',
269             TONGA => 'TO',
270             TRINIDAD_TOBAGO => 'TT',
271             TUNISIA => 'TN',
272             TURKEY => 'TR',
273             TURKMENISTAN => 'TM',
274             TURKS_CAICOS_ISLANDS => 'TC',
275             TUVALU => 'TV',
276             UGANDA => 'UG',
277             UKRAINE => 'UA',
278             UNITED_ARAB_EMIRATES => 'AE',
279             UNITED_KINGDOM => 'GB',
280             UNITED_STATES => 'US',
281             URUGUAY => 'UY',
282             US_OUTLYING_ISLANDS => 'UM',
283             US_VIRGIN_ISLANDS => 'VI',
284             UZBEKISTAN => 'UZ',
285             VANUATU => 'VU',
286             VATICAN_CITY => 'VA',
287             VENEZUELA => 'VE',
288             VIETNAM => 'VN',
289             WALLIS_FUTUNA => 'WF',
290             WESTERN_SAHARA => 'EH',
291             YEMEN => 'YE',
292             ZAMBIA => 'ZM',
293             ZIMBABWE => 'ZW',
294 2     2   853 };
  2         2  
295              
296             our $VERSION = '0.07';
297              
298             my @region = qw(
299             AFRICA
300             AMERICAS
301             ASIA
302             AUSTRALASIA
303             CARIBBEAN
304             CENTRAL_AMERICA
305             CENTRAL_ASIA
306             EASTERN_AFRICA
307             EASTERN_ASIA
308             EASTERN_EUROPE
309             EUROPE
310             EUROPEAN_UNION
311             LATIN_AMERICA
312             MELANESIA
313             MICRONESIAN_REGION
314             MIDDLE_AFRICA
315             NORTH_AMERICA
316             NORTHERN_AFRICA
317             NORTHERN_AMERICA
318             NORTHERN_EUROPE
319             OCEANIA
320             OUTLYING_OCEANIA
321             POLYNESIA
322             SOUTH_AMERICA
323             SOUTHEAST_ASIA
324             SOUTHERN_AFRICA
325             SOUTHERN_ASIA
326             SOUTHERN_EUROPE
327             WESTERN_AFRICA
328             WESTERN_ASIA
329             WESTERN_EUROPE
330             WORLD
331             );
332              
333             my @country = qw(
334             AFGHANISTAN
335             ALAND_ISLANDS
336             ALBANIA
337             ALGERIA
338             AMERICAN_SAMOA
339             ANDORRA
340             ANGOLA
341             ANGUILLA
342             ANTARCTICA
343             ANTIGUA_BARBUDA
344             ARGENTINA
345             ARMENIA
346             ARUBA
347             AUSTRALIA
348             AUSTRIA
349             AZERBAIJAN
350             BAHAMAS
351             BAHRAIN
352             BANGLADESH
353             BARBADOS
354             BELARUS
355             BELGIUM
356             BELIZE
357             BENIN
358             BERMUDA
359             BHUTAN
360             BOLIVIA
361             BOSNIA
362             BOTSWANA
363             BOUVET_ISLAND
364             BRAZIL
365             BRITISH_INDIAN_OCEAN_TERRITORY
366             BRITISH_VIRGIN_ISLANDS
367             BRUNEI
368             BULGARIA
369             BURKINA_FASO
370             BURUNDI
371             CAMBODIA
372             CAMEROON
373             CANADA
374             CAPE_VERDE
375             CARIBBEAN_NETHERLANDS
376             CAYMAN_ISLANDS
377             CENTRAL_AFRICAN_REPUBLIC
378             CHAD
379             CHILE
380             CHINA
381             CHRISTMAS_ISLAND
382             COCOS_ISLANDS
383             COLOMBIA
384             COMOROS
385             CONGO_DRC
386             CONGO_REPUBLIC
387             COOK_ISLANDS
388             COSTA_RICA
389             CROATIA
390             CUBA
391             CURACAO
392             CYPRUS
393             CZECH_REPUBLIC
394             DENMARK
395             DJIBOUTI
396             DOMINICA
397             DOMINICAN_REPUBLIC
398             EAST_TIMOR
399             ECUADOR
400             EGYPT
401             EL_SALVADOR
402             EQUATORIAL_GUINEA
403             ERITREA
404             ESTONIA
405             ETHIOPIA
406             FALKLAND_ISLANDS
407             FAROE_ISLANDS
408             FIJI
409             FINLAND
410             FRANCE
411             FRENCH_GUIANA
412             FRENCH_POLYNESIA
413             FRENCH_SOUTHERN_TERRITORIES
414             GABON
415             GAMBIA
416             GEORGIA
417             GERMANY
418             GHANA
419             GIBRALTAR
420             GREECE
421             GREENLAND
422             GRENADA
423             GUADELOUPE
424             GUAM
425             GUATEMALA
426             GUERNSEY
427             GUINEA
428             GUINEA_BISSAU
429             GUYANA
430             HAITI
431             HEARD_MCDONALD_ISLANDS
432             HONDURAS
433             HONG_KONG
434             HUNGARY
435             ICELAND
436             INDIA
437             INDONESIA
438             IRAN
439             IRAQ
440             IRELAND
441             ISLE_OF_MAN
442             ISRAEL
443             ITALY
444             IVORY_COAST
445             JAMAICA
446             JAPAN
447             JERSEY
448             JORDAN
449             KAZAKHSTAN
450             KENYA
451             KIRIBATI
452             KUWAIT
453             KYRGYZSTAN
454             LAOS
455             LATVIA
456             LEBANON
457             LESOTHO
458             LIBERIA
459             LIBYA
460             LIECHTENSTEIN
461             LITHUANIA
462             LUXEMBOURG
463             MACAU
464             MACEDONIA
465             MADAGASCAR
466             MALAWI
467             MALAYSIA
468             MALDIVES
469             MALI
470             MALTA
471             MARSHALL_ISLANDS
472             MARTINIQUE
473             MAURITANIA
474             MAURITIUS
475             MAYOTTE
476             MEXICO
477             MICRONESIA
478             MOLDOVA
479             MONACO
480             MONGOLIA
481             MONTENEGRO
482             MONTSERRAT
483             MOROCCO
484             MOZAMBIQUE
485             MYANMAR
486             NAMIBIA
487             NAURU
488             NEPAL
489             NETHERLANDS
490             NEW_CALEDONIA
491             NEW_ZEALAND
492             NICARAGUA
493             NIGER
494             NIGERIA
495             NIUE
496             NORFOLK_ISLAND
497             NORTHERN_MARIANA_ISLANDS
498             NORTH_KOREA
499             NORWAY
500             OMAN
501             PAKISTAN
502             PALAU
503             PALESTINE
504             PANAMA
505             PAPUA_NEW_GUINEA
506             PARAGUAY
507             PERU
508             PHILIPPINES
509             PITCAIRN_ISLANDS
510             POLAND
511             PORTUGAL
512             PUERTO_RICO
513             QATAR
514             REUNION
515             ROMANIA
516             RUSSIA
517             RWANDA
518             SAMOA
519             SAN_MARINO
520             SAO_TOME_PRINCIPE
521             SAUDI_ARABIA
522             SENEGAL
523             SERBIA
524             SEYCHELLES
525             SIERRA_LEONE
526             SINGAPORE
527             SINT_MAARTEN
528             SLOVAKIA
529             SLOVENIA
530             SOLOMON_ISLANDS
531             SOMALIA
532             SOUTH_AFRICA
533             SOUTH_GEORGIA_SOUTH_SANDWICH_ISLANDS
534             SOUTH_KOREA
535             SOUTH_SUDAN
536             SPAIN
537             SRI_LANKA
538             ST_BARTHELEMY
539             ST_HELENA
540             ST_KITTS_NEVIS
541             ST_LUCIA
542             ST_MARTIN
543             ST_PIERRE_MIQUELON
544             ST_VINCENT_GRENADINES
545             SUDAN
546             SURINAME
547             SVALBARD_JAN_MAYEN
548             SWAZILAND
549             SWEDEN
550             SWITZERLAND
551             SYRIA
552             TAIWAN
553             TAJIKISTAN
554             TANZANIA
555             THAILAND
556             TOGO
557             TOKELAU
558             TONGA
559             TRINIDAD_TOBAGO
560             TUNISIA
561             TURKEY
562             TURKMENISTAN
563             TURKS_CAICOS_ISLANDS
564             TUVALU
565             UGANDA
566             UKRAINE
567             UNITED_ARAB_EMIRATES
568             UNITED_KINGDOM
569             UNITED_STATES
570             URUGUAY
571             US_OUTLYING_ISLANDS
572             US_VIRGIN_ISLANDS
573             UZBEKISTAN
574             VANUATU
575             VATICAN_CITY
576             VENEZUELA
577             VIETNAM
578             WALLIS_FUTUNA
579             WESTERN_SAHARA
580             YEMEN
581             ZAMBIA
582             ZIMBABWE
583             );
584              
585             our @EXPORT_OK = (@region, @country);
586              
587             our %EXPORT_TAGS = (
588             all => \@EXPORT_OK,
589             region => \@region,
590             country => \@country,
591             );
592              
593             1;
594              
595             __END__