| line |
true |
false |
branch |
|
70
|
3 |
60 |
@BUILD ? : |
|
76
|
2 |
33 |
unless @BUILD and $should_be and $BUILD[-1] == $should_be |
|
92
|
2 |
210 |
unless @VARS and $should_be and $VARS[-1] == $should_be |
|
101
|
1 |
28 |
unless @VARS |
|
107
|
16 |
12 |
if (@_) |
|
108
|
11 |
5 |
if (ref $_[0] and &reftype($_[0]) eq 'CODE') { } |
|
110
|
6 |
5 |
unless defined $vars->{$name} |
|
122
|
117 |
173 |
if @BUILD |
|
134
|
298 |
1 |
unless defined $params{'level'} |
|
139
|
299 |
0 |
unless ($subname) |
|
146
|
317 |
298 |
if (my $type = &reftype($item)) { } |
|
|
3 |
295 |
elsif ($item =~ /^\d+$/) { } |
|
147
|
295 |
22 |
if ($type eq 'CODE') { } |
|
|
21 |
1 |
elsif ($type eq 'HASH') { } |
|
148
|
1 |
294 |
if $code |
|
154
|
1 |
20 |
if $meta |
|
164
|
1 |
2 |
if @lines >= 2 |
|
170
|
1 |
294 |
if $name |
|
177
|
1 |
293 |
unless $name |
|
179
|
1 |
292 |
unless $code |
|
183
|
277 |
15 |
if $info->{'name'} =~ /__ANON__$/ |
|
195
|
263 |
29 |
$params{'set_primary'} ? : |
|
|
291 |
1 |
$params{'unit'} ? : |
|
216
|
1 |
27 |
unless $ok |
|
221
|
2 |
25 |
if defined wantarray |
|
223
|
1 |
24 |
unless my $current = _current($caller->[0]) |
|
251
|
20 |
15 |
unless ($stash->{$PKG}) |
|
267
|
32 |
78 |
if ($it->type and $it->type eq 'group') |
|
268
|
0 |
32 |
unless my $prim = $it->primary |
|
273
|
3 |
75 |
if $modify |
|
274
|
72 |
6 |
if $buildup |
|
275
|
3 |
75 |
if $primary |
|
276
|
59 |
19 |
if $teardown |
|
293
|
3 |
327 |
$reftype eq 'CODE' ? : |
|
294
|
2 |
328 |
unless $cb_sub |
|
298
|
1 |
327 |
unless $reftype eq 'ARRAY' |
|
301
|
83 |
244 |
@$stashes > 1 ? : |
|
304
|
1 |
326 |
unless $ALLOWED_STASHES{$check} |
|
316
|
1 |
261 |
if defined wantarray |
|
319
|
1 |
260 |
unless my $current = _current($caller->[0]) |