| line |
true |
false |
branch |
|
28
|
6 |
0 |
if (ref $word_list eq 'ARRAY') { } |
|
35
|
0 |
0 |
unless -r $word_list |
|
36
|
0 |
0 |
if ($$self{'cache'} and -s $word_list) |
|
37
|
0 |
0 |
unless open my $fh, '<', $word_list |
|
55
|
0 |
1 |
unless $$self{'cache'} |
|
57
|
1 |
0 |
if (ref $word_list eq 'ARRAY') { } |
|
61
|
0 |
0 |
unless open my $fh, '<', $word_list |
|
73
|
0 |
1 |
unless $$self{'cache'} |
|
85
|
3 |
0 |
if $$self{'cache'} |
|
86
|
0 |
0 |
unless open my $fh, '<', $$self{'file'} |
|
97
|
3 |
12 |
if (defined $length) { } |
|
99
|
1 |
2 |
unless @word_list |
|
103
|
1 |
11 |
unless @word_list |
|
113
|
0 |
0 |
unless open my $fh, '<', $$self{'file'} |
|
114
|
0 |
0 |
unless -s $$self{'file'} |
|
118
|
0 |
0 |
unless not defined $length or /^\w{$length}$/ |
|
120
|
0 |
0 |
if int rand $lineno == 0 |
|
122
|
0 |
0 |
unless defined $word |
|
132
|
15 |
0 |
if $$self{'cache'} |
|
147
|
0 |
0 |
unless open my $fh, '<', $$self{'file'} |
|
150
|
0 |
0 |
if $_ eq $word |
|
160
|
99 |
0 |
if $$self{'cache'} |
|
177
|
0 |
0 |
unless open my $fh, '<', $$self{'file'} |
|
190
|
3 |
0 |
if $$self{'cache'} |
|
208
|
4 |
8 |
if $_[0] =~ /$re/ |