| line |
true |
false |
branch |
|
134
|
3 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/u) |
|
138
|
3 |
0 |
if (((caller 0)[3] // '') =~ /\b(?:un)?import\Z/u) |
|
144
|
0 |
0 |
$pos_test_code eq $test_code ? : |
|
|
20 |
2 |
$pos_test_code eq $test_code ? : |
|
155
|
0 |
0 |
if ($op and $op =~ /[=!~]~/u and $rhs =~ /$PERL_MATCHABLE/u) { } |
|
|
0 |
0 |
elsif ($op) { } |
|
|
6 |
16 |
if ($op and $op =~ /[=!~]~/u and $rhs =~ /$PERL_MATCHABLE/u) { } |
|
|
13 |
3 |
elsif ($op) { } |
|
198
|
0 |
0 |
$lhs && !($lhs =~ /$PERL_LITERAL/u) ? : |
|
|
0 |
0 |
$rhs && !($rhs =~ /$PERL_LITERAL/u) ? : |
|
|
16 |
6 |
$lhs && !($lhs =~ /$PERL_LITERAL/u) ? : |
|
|
7 |
15 |
$rhs && !($rhs =~ /$PERL_LITERAL/u) ? : |
|
203
|
0 |
0 |
if @diagnostics |
|
|
18 |
4 |
if @diagnostics |
|
205
|
0 |
0 |
if (eval $desc // '') ne "$test_code" |
|
|
1 |
21 |
if (eval $desc // '') ne "$test_code" |