| line |
true |
false |
branch |
|
17
|
0 |
4 |
unless $class eq 'Eval::Safe' |
|
20
|
1 |
3 |
if (@unknown_options) |
|
25
|
0 |
3 |
if ($options{'package'} and not $options{'force_package'}) |
|
27
|
0 |
0 |
if eval "%$options{'package'}::" |
|
29
|
1 |
2 |
if ($options{'safe'} // !1) { } |
|
55
|
0 |
0 |
unless eval "%${package}::" |
|
57
|
0 |
0 |
unless $v =~ /^([&*\$%\@])(\w+)$/u |
|
70
|
0 |
0 |
unless $var =~ /^([&*\$%\@])(\w+)$/u |
|
93
|
6 |
0 |
if (not defined $reftype) { } |
|
|
0 |
0 |
elsif ($reftype eq 'SCALAR') { } |
|
|
0 |
0 |
elsif ($reftype eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($reftype eq 'HASH') { } |
|
94
|
0 |
6 |
if ($arg) { } |
|
127
|
0 |
0 |
unless $reftype |
|
128
|
0 |
0 |
if ++$seen_refs{&refaddr($item)} > 1 |
|
129
|
0 |
0 |
if ($reftype eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($reftype eq 'HASH') { } |
|
|
0 |
0 |
elsif ($reftype eq 'CODE') { } |
|
140
|
0 |
0 |
if (defined wantarray) |
|
141
|
0 |
0 |
wantarray ? : |
|
153
|
0 |
0 |
if $p eq '' |
|
154
|
0 |
0 |
unless $p =~ /^\w+(::\w+)*$/u |