| line |
true |
false |
branch |
|
31
|
0 |
7 |
if ($debug) |
|
32
|
0 |
0 |
if ($config->get_directive('_', '_config-path')) |
|
50
|
4 |
59 |
if ($enable_plugin{$name}) |
|
52
|
3 |
1 |
if (%event) |
|
68
|
15 |
11 |
unless ($file =~ /\.(?:pm|pl)$/i) |
|
74
|
15 |
0 |
if (defined $shebang) { } |
|
76
|
1 |
14 |
unless $shebang =~ /^\#\!.*perl/ |
|
84
|
1 |
14 |
if $skip |
|
86
|
0 |
14 |
if ($@) |
|
97
|
0 |
25 |
unless ($document) |
|
146
|
99 |
72 |
if (first sub {
$value =~ /$_/;
}
, @$list) |
|
160
|
2 |
1 |
if ($ignore_common) |
|
161
|
62 |
46 |
if _any_match($_, \@includes) |
|
162
|
26 |
36 |
if not _any_match($_, \@excludes) |
|
170
|
1 |
4 |
ref $_[-1] eq 'HASH' ? : |
|
176
|
1 |
4 |
unless defined $file |
|
178
|
1 |
3 |
unless (-e $file) |
|
182
|
2 |
1 |
if (-d $file) { } |
|
203
|
31 |
28561 |
if (exists $$self{'handlers'}{$event}) |
|
205
|
31 |
0 |
if (@handlers) |
|
212
|
0 |
31 |
if ($@) |
|
225
|
4056 |
16421 |
if ($element->isa('PPI::Node')) |
|
232
|
4056 |
16421 |
if ($element->isa('PPI::Node')) |
|
238
|
4056 |
16421 |
if ($post_leave) |
|
247
|
1 |
2 |
wantarray ? : |
|
252
|
4 |
1 |
wantarray ? : |