File Coverage

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


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