File Coverage

blib/lib/Geo/Region/Constant.pm
Criterion Covered Total %
statement 111 111 100.0
branch n/a
condition n/a
subroutine 37 37 100.0
pod n/a
total 148 148 100.0


line stmt bran cond sub pod time code
1             package Geo::Region::Constant;
2              
3 2     2   84414 use v5.8.1;
  2         6  
  2         79  
4 2     2   8 use utf8;
  2         3  
  2         20  
5 2     2   77 use strict;
  2         3  
  2         80  
6 2     2   7 use warnings;
  2         2  
  2         64  
7 2     2   834 use parent 'Exporter';
  2         508  
  2         9  
8              
9 2     2   119 use constant AFRICA => '002';
  2         2  
  2         122  
10 2     2   8 use constant AMERICAS => '019';
  2         2  
  2         69  
11 2     2   7 use constant ASIA => '142';
  2         2  
  2         64  
12 2     2   7 use constant AUSTRALASIA => '053';
  2         2  
  2         69  
13 2     2   37 use constant CARIBBEAN => '029';
  2         3  
  2         91  
14 2     2   8 use constant CENTRAL_AMERICA => '013';
  2         3  
  2         68  
15 2     2   8 use constant CENTRAL_ASIA => '143';
  2         1  
  2         77  
16 2     2   7 use constant EASTERN_AFRICA => '014';
  2         2  
  2         64  
17 2     2   7 use constant EASTERN_ASIA => '030';
  2         6  
  2         74  
18 2     2   7 use constant EASTERN_EUROPE => '151';
  2         2  
  2         80  
19 2     2   7 use constant EUROPE => '150';
  2         3  
  2         64  
20 2     2   7 use constant EUROPEAN_UNION => 'EU';
  2         2  
  2         72  
21 2     2   6 use constant LATIN_AMERICA => '419';
  2         6  
  2         72  
22 2     2   7 use constant MELANESIA => '054';
  2         2  
  2         69  
23 2     2   8 use constant MICRONESIAN_REGION => '057';
  2         3  
  2         70  
24 2     2   8 use constant MIDDLE_AFRICA => '017';
  2         2  
  2         68  
25 2     2   8 use constant NORTH_AMERICA => '003';
  2         2  
  2         76  
26 2     2   7 use constant NORTHERN_AFRICA => '015';
  2         2  
  2         68  
27 2     2   18 use constant NORTHERN_AMERICA => '021';
  2         3  
  2         71  
28 2     2   8 use constant NORTHERN_EUROPE => '154';
  2         2  
  2         75  
29 2     2   8 use constant OCEANIA => '009';
  2         2  
  2         66  
30 2     2   8 use constant OUTLYING_OCEANIA => 'QO';
  2         2  
  2         72  
31 2     2   7 use constant POLYNESIA => '061';
  2         2  
  2         71  
32 2     2   7 use constant SOUTH_AMERICA => '005';
  2         2  
  2         79  
33 2     2   7 use constant SOUTHEAST_ASIA => '035';
  2         2  
  2         65  
34 2     2   6 use constant SOUTHERN_AFRICA => '018';
  2         13  
  2         77  
35 2     2   7 use constant SOUTHERN_ASIA => '034';
  2         3  
  2         105  
36 2     2   8 use constant SOUTHERN_EUROPE => '039';
  2         2  
  2         80  
37 2     2   7 use constant WESTERN_AFRICA => '011';
  2         2  
  2         69  
38 2     2   7 use constant WESTERN_ASIA => '145';
  2         2  
  2         75  
39 2     2   7 use constant WESTERN_EUROPE => '155';
  2         2  
  2         72  
40 2     2   6 use constant WORLD => '001';
  2         3  
  2         201  
41              
42             our $VERSION = '0.05';
43              
44             our @EXPORT_OK = qw(
45             AFRICA
46             AMERICAS
47             ASIA
48             AUSTRALASIA
49             CARIBBEAN
50             CENTRAL_AMERICA
51             CENTRAL_ASIA
52             EASTERN_AFRICA
53             EASTERN_ASIA
54             EASTERN_EUROPE
55             EUROPE
56             EUROPEAN_UNION
57             LATIN_AMERICA
58             MELANESIA
59             MICRONESIAN_REGION
60             MIDDLE_AFRICA
61             NORTH_AMERICA
62             NORTHERN_AFRICA
63             NORTHERN_AMERICA
64             NORTHERN_EUROPE
65             OCEANIA
66             OUTLYING_OCEANIA
67             POLYNESIA
68             SOUTH_AMERICA
69             SOUTHEAST_ASIA
70             SOUTHERN_AFRICA
71             SOUTHERN_ASIA
72             SOUTHERN_EUROPE
73             WESTERN_AFRICA
74             WESTERN_ASIA
75             WESTERN_EUROPE
76             WORLD
77             );
78              
79             our %EXPORT_TAGS = ( all => \@EXPORT_OK );
80              
81             1;
82              
83             __END__