File Coverage

blib/lib/Acme/MetaSyntactic/xkcdcommon1949.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Acme::MetaSyntactic::xkcdcommon1949;
2 1     1   30952 use base qw(Acme::MetaSyntactic::List);
  1         2  
  1         1913  
3              
4 1     1   4548 use strict;
  1         2  
  1         27  
5 1     1   5 use warnings;
  1         2  
  1         22  
6              
7 1     1   658 use Crypt::XKCDCommon1949;
  1         3  
  1         144  
8              
9             our $VERSION = '1.000';
10              
11             __PACKAGE__->init();
12              
13             # our data isn't actually in __DATA__, but rather we override what
14             # ->init extracted with this glob routine to alias the data from
15             # Crypt::XKCDCommon1949 instead
16             *List = \@Crypt::XKCDCommon1949::words;
17              
18             1;
19              
20             __DATA__