line |
true |
false |
branch |
12
|
8 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/u) |
31
|
0 |
0 |
if ($scoped) |
|
2 |
6 |
if ($scoped) |
38
|
0 |
0 |
$declarator ? : |
|
0 |
0 |
$sigil eq '%' ? : |
|
0 |
0 |
$sigil eq '@' ? : |
|
0 |
0 |
$sigil eq '$' ? : |
|
0 |
0 |
$assignment ? : |
|
5 |
3 |
$declarator ? : |
|
1 |
0 |
$sigil eq '%' ? : |
|
1 |
1 |
$sigil eq '@' ? : |
|
6 |
2 |
$sigil eq '$' ? : |
|
0 |
8 |
$assignment ? : |
|
8 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/u) |
42
|
1 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/u) |
51
|
1 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/u) |
55
|
0 |
0 |
if $declarator or $assignment |
|
0 |
1 |
if $declarator or $assignment |
|
15 |
35 |
if substr($_[1], -12) eq 'Data/Dump.pm' |
60
|
29 |
6 |
if ($dump ne $prev) |
63
|
0 |
29 |
-t *STDERR ? : |
77
|
3 |
22 |
if $ID and not exists $$hints{"Var::Mystic tracker: $ID"} |
89
|
0 |
7 |
if $ID and not exists $$hints{"Var::Mystic tracker: $ID"} |
96
|
0 |
2 |
if $ID and not exists $$hints{"Var::Mystic tracker: $ID"} |
111
|
0 |
0 |
if $ID and not exists $$hints{"Var::Mystic tracker: $ID"} |
118
|
0 |
17 |
if $ID and not exists $$hints{"Var::Mystic tracker: $ID"} |
125
|
0 |
2 |
if $ID and not exists $$hints{"Var::Mystic tracker: $ID"} |