line |
true |
false |
branch |
43
|
1 |
0 |
if (scalar @arguments == 0) |
75
|
11 |
0 |
if (@pos) |
78
|
0 |
11 |
if ($tmp =~ /(<.*>)/) |
81
|
0 |
0 |
if (not $file_access =~ /\$\_\s*=\s*<.*>/o) |
100
|
0 |
2 |
if $status < 0 |
134
|
0 |
11 |
unless $$self{$base_keyword} and $base_keyword |
138
|
11 |
0 |
if ref $r_fctn eq 'CODE' |
140
|
0 |
10 |
if $DEBUG |
168
|
0 |
11 |
if $DEBUG |
169
|
0 |
11 |
if $DEBUG |
179
|
2 |
9 |
if ($keyword =~ /elsif.*/) |
191
|
3 |
8 |
if ($keyword =~ /.*until/) { } |
199
|
0 |
11 |
if $DEBUG |
200
|
0 |
11 |
if $DEBUG |
203
|
8 |
3 |
if (scalar @pos) { } |
213
|
3 |
5 |
if ($keyword =~ /.*until/) { } |
222
|
0 |
8 |
if $DEBUG |