File Coverage

blib/lib/Getopt/EX/i18n/iso3361.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Getopt::EX::i18n::iso3361;
2 1     1   17 use 5.014;
  1         4  
3 1     1   5 use strict;
  1         2  
  1         37  
4 1     1   5 use warnings;
  1         2  
  1         42  
5 1     1   7 use Exporter 'import';
  1         2  
  1         175  
6              
7             our @EXPORT_OK = qw(%iso3361);
8              
9             ##
10             ## This data is generated by Country::Codes module.
11             ##
12              
13             our %iso3361 = (
14             AM => "Armenia",
15             AT => "Austria",
16             AU => "Australia",
17             BE => "Belgium",
18             BG => "Bulgaria",
19             BR => "Brazil",
20             BY => "Belarus",
21             CA => "Canada",
22             CH => "Switzerland",
23             CN => "China",
24             CZ => "Czech Republic",
25             DE => "Germany",
26             DK => "Denmark",
27             EE => "Estonia",
28             ES => "Spain",
29             ET => "Ethiopia",
30             FI => "Finland",
31             FR => "France",
32             GB => "United Kingdom",
33             GR => "Greece",
34             HK => "Hong Kong",
35             HR => "Croatia",
36             HU => "Hungary",
37             IE => "Ireland",
38             IL => "Israel",
39             IS => "Iceland",
40             IT => "Italy",
41             JP => "Japan",
42             KR => "Korea, Republic of",
43             KZ => "Kazakhstan",
44             LT => "Lithuania",
45             NL => "Netherlands",
46             NO => "Norway",
47             NZ => "New Zealand",
48             PL => "Poland",
49             PT => "Portugal",
50             RO => "Romania",
51             RU => "Russian Federation",
52             SE => "Sweden",
53             SI => "Slovenia",
54             SK => "Slovakia",
55             TR => "Turkey",
56             TW => "Taiwan, Province of China",
57             UA => "Ukraine",
58             US => "United States",
59             YU => "Yugoslavia",
60             ZA => "South Africa",
61             );
62              
63             1;