File Coverage

blib/lib/Games/Word/Wordlist/Country.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Games::Word::Wordlist::Country;
2              
3             our $DATE = '2016-01-13'; # DATE
4             our $VERSION = '0.04'; # VERSION
5              
6 1     1   757 use 5.010001;
  1         3  
7 1     1   5 use strict;
  1         1  
  1         20  
8 1     1   5 use warnings;
  1         2  
  1         26  
9              
10 1     1   746 use parent qw(Games::Word::Wordlist);
  1         323  
  1         7  
11              
12 1     1   55033 use WordList::EN::CountryNames;
  1         1445  
  1         62  
13              
14             sub new {
15 1     1 1 34 bless Games::Word::Wordlist->new ([WordList::EN::CountryNames->new->all_words]), shift;
16             }
17              
18             1;
19              
20             # ABSTRACT: English names of countries of the world
21              
22              
23             __END__