| line |
true |
false |
branch |
|
99
|
2 |
5 |
if $ACTIVATING |
|
102
|
7 |
0 |
if defined wantarray |
|
128
|
35 |
122 |
if (/^=(\w+)/) { } |
|
|
52 |
70 |
elsif ($INPOD) { } |
|
|
7 |
63 |
elsif (/^#\s+([A-Z_0-9]+)\b/) { } |
|
131
|
9 |
26 |
if ($1 eq 'cut') { } |
|
|
16 |
10 |
elsif ($1 eq 'begin') { } |
|
|
5 |
5 |
elsif ($1 eq 'end') { } |
|
132
|
2 |
7 |
$ACTIVATING ? : |
|
138
|
14 |
2 |
if (/^=begin\s+([A-Z_0-9]+)\b/) { } |
|
141
|
9 |
5 |
if ($ALL or $ENV{$1}) { } |
|
142
|
1 |
8 |
$ACTIVATING ? : |
|
149
|
2 |
3 |
$ACTIVATING ? : |
|
164
|
2 |
3 |
$ACTIVATING ? : |
|
183
|
3 |
4 |
if $ENV{$1} |
|
201
|
0 |
6 |
if (caller)[2] and ($_[0] ne '_testing_' and not shift()) |
|
213
|
2 |
0 |
if (/^:?all$/) { } |
|
|
0 |
0 |
elsif (/^:?selected$/) { } |
|
|
0 |
0 |
elsif (/^[A-Z_0-9]+$/) { } |
|
234
|
0 |
6 |
if @ignored |
|
241
|
0 |
0 |
if (($STATUS = &Filter::Util::Call::filter_read()) > 0) |