File Coverage

blib/lib/Games/Word/Wordlist/Country.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 19 19 100.0


line stmt bran cond sub pod time code
1             package Games::Word::Wordlist::Country;
2              
3             our $DATE = '2014-10-07'; # DATE
4             our $VERSION = '0.02'; # VERSION
5              
6 1     1   528 use 5.010001;
  1         3  
  1         29  
7 1     1   3 use strict;
  1         1  
  1         22  
8 1     1   3 use warnings;
  1         1  
  1         20  
9              
10 1     1   403 use parent qw(Games::Word::Wordlist);
  1         289  
  1         4  
11              
12             our $COUNTRIES = ["afghanistan","aland islands","albania","algeria","american samoa","andorra","angola","anguilla","antarctica","antigua and barbuda","argentina","armenia","aruba","australia","austria","azerbaijan","bahamas","bahrain","bangladesh","barbados","belarus","belgium","belize","benin","bermuda","bhutan","bolivia","bonaire, sint eustatius and saba","bosnia and herzegovina","botswana","bouvet island","brazil","british indian ocean territory","brunei","bulgaria","burkina faso","burma","burundi","cabo verde","cambodia","cameroon","canada","cayman islands","central african republic","chad","chile","china","christmas island","cocos islands","colombia","comoros","congo","congo-kinshasa","cook islands","costa rica","cote d'ivoire","croatia","cuba","curacao","cyprus","czech republic","denmark","djibouti","dominica","dominican republic","east timor","ecuador","egypt","el salvador","equatorial guinea","eritrea","estonia","ethiopia","falkland islands (malvinas)","faroe islands","federated states of micronesia","fiji","finland","france","french guiana","french polynesia","french southern territories","gabon","gambia","georgia","germany","ghana","gibraltar","greece","greenland","grenada","guadeloupe","guam","guatemala","guernsey","guinea","guinea-bissau","guyana","haiti","heard island and mcdonald islands","holy see","honduras","hong kong","hungary","iceland","india","indonesia","iran","iraq","ireland","isle of man","israel","italy","jamaica","japan","jersey","jordan","kazakstan","kenya","kiribati","kuwait","kyrgyzstan","lao people's democratic republic","latvia","lebanon","lesotho","liberia","libya","liechtenstein","lithuania","luxembourg","macao","macedonia","madagascar","malawi","malaysia","maldives","mali","malta","marshall islands","martinique","mauritania","mauritius","mayotte","mexico","monaco","mongolia","montenegro","montserrat","morocco","mozambique","namibia","nauru","nepal","netherlands","new caledonia","new zealand","nicaragua","niger","nigeria","niue","norfolk island","north korea","northern mariana islands","norway","oman","pakistan","palau","panama","papua new guinea","paraguay","peru","philippines","pitcairn","poland","portugal","puerto rico","qatar","republic of moldova","reunion","romania","russian federation","rwanda","saint barthelemy","saint helena","saint kitts and nevis","saint lucia","saint martin","saint pierre and miquelon","saint vincent and the grenadines","samoa","san marino","sao tome and principe","saudi arabia","senegal","serbia","seychelles","sierra leone","singapore","sint maarten (dutch part)","slovakia","slovenia","solomon islands","somalia","south africa","south georgia and the islands","south korea","south sudan","spain","sri lanka","state of palestine","sudan","suriname","svalbard and jan mayen","swaziland","sweden","switzerland","syria","taiwan","tajikistan","thailand","togo","tokelau","tonga","trinidad and tobago","tunisia","turkey","turkmenistan","turks and caicos islands","tuvalu","uganda","uk","ukraine","united arab emirates","united republic of tanzania","united states minor outlying islands","uruguay","us","uzbekistan","vanuatu","venezuela, bolivarian republic of ","vietnam","virgin islands","virgin islands (uk)","wallis and futuna","western sahara","yemen","zambia","zimbabwe"]; # PRECOMPUTE
13              
14             sub new {
15 1     1 1 16 bless Games::Word::Wordlist->new ($COUNTRIES), shift;
16             }
17              
18             1;
19              
20             # ABSTRACT: English names of countries of the world
21              
22             __END__