line |
true |
false |
branch |
36
|
4 |
3 |
if $SPELLCHECKER |
49
|
3 |
0 |
if (ref $dryrun_results) |
71
|
1 |
3 |
if length $errors |
76
|
3 |
13 |
if ($ok) |
81
|
0 |
3 |
unless $SPELLCHECKER |
90
|
3 |
1 |
if $dryrun |
119
|
0 |
4 |
unless (-r $file) |
138
|
1 |
2 |
unless ($ok) |
148
|
0 |
0 |
unless (has_working_spellchecker()) |
157
|
0 |
0 |
unless pod_file_spelling_ok($file) |
159
|
0 |
0 |
if (keys %ALL_WORDS) |
176
|
0 |
0 |
@_ ? : |
183
|
0 |
0 |
if (-d $file) |
184
|
0 |
0 |
unless opendir my $dirhandle, $file |
189
|
0 |
0 |
if $_ ne 'CVS' |
195
|
0 |
0 |
if (-f $file) |
196
|
0 |
0 |
unless _is_perl($file) |
197
|
0 |
0 |
unless &$FILE_FILTER($file) |
206
|
0 |
0 |
if -d 'blib' |
213
|
0 |
0 |
if $file =~ /\.PL$/ |
214
|
0 |
0 |
if $file =~ /\.p(l|lx|m|od)$/ |
215
|
0 |
0 |
if $file =~ /\.t$/ |
217
|
0 |
0 |
unless open my $handle, '<', $file |
220
|
0 |
0 |
if defined $first and $first =~ /^#!.*perl/ |
235
|
0 |
1 |
if $word =~ /\s/ or $word =~ /:/ |