line |
true |
false |
branch |
37
|
7 |
2 |
if $Devel::Init::DefaultInit |
49
|
5 |
10 |
if (/^:Init$/) { } |
|
1 |
9 |
elsif (/^:NoDefault$/) { } |
|
0 |
9 |
elsif (/^-(No)?StackTrace$/) { } |
|
2 |
7 |
elsif (/^\@(Predicates)$/) { } |
|
6 |
1 |
elsif (/^&?(RunInits|RegisterInit|InitBlock|InitSub)$/) { } |
59
|
1 |
5 |
if 'RunInits' eq $sub |
82
|
0 |
8 |
if $type ne ref $src |
84
|
0 |
8 |
unless $src |
86
|
1 |
7 |
if (*{$glob;}{$type}) |
99
|
17 |
9 |
if ('GLOB' ne ref $glob) |
111
|
0 |
17 |
if 'GLOB' ne ref $glob |
125
|
5 |
0 |
if (not $prev) { } |
136
|
5 |
0 |
if (not $prev) { } |
151
|
0 |
0 |
if ('CODE' eq ref $code) { } |
156
|
0 |
0 |
unless $Devel::Init::Attribs{0 + $code} |
167
|
5 |
0 |
if (/^Init\b/) { } |
185
|
0 |
13 |
if (/^(\\?)\@(\w+)$/) { } |
|
0 |
13 |
elsif (not /^\w[-.\w]*$/) { } |
188
|
0 |
0 |
if (not $av) { } |
|
0 |
0 |
elsif ($asRef) { } |
205
|
13 |
2 |
@conds ? : |
227
|
0 |
5 |
if (defined $val) |
234
|
0 |
5 |
if (wantarray) { } |
241
|
0 |
5 |
wantarray ? : |
250
|
0 |
0 |
if ($Devel::Init::StackTrace) |
284
|
0 |
0 |
if (not $Devel::Init::StackTrace) { } |
290
|
0 |
0 |
unless $prev |
297
|
0 |
13 |
if (not $okay) |
298
|
0 |
0 |
$Devel::Init::StackTrace && $error ? : |
310
|
7 |
17 |
if (s/^not_//) { } |
|
8 |
9 |
elsif (s/^only_//) { } |
325
|
15 |
2 |
if 'ARRAY' eq ref $code |
330
|
4 |
21 |
if 1 < abs(($need{$cond} || 0) - ($$hvHave{$cond} || 0)) |
344
|
0 |
0 |
if (/^-(No)StackTrace$/i) { } |
355
|
17 |
0 |
unless $fail |
358
|
0 |
12 |
if $fail |