| line |
true |
false |
branch |
|
27
|
30 |
2 |
if ($def1) { } |
|
28
|
1 |
29 |
unless $def2 |
|
30
|
1 |
1 |
$def2 ? : |
|
37
|
9 |
20 |
if (not $reftype1 || $reftype2) { } |
|
|
2 |
18 |
elsif ($reftype1 xor $reftype2) { } |
|
38
|
0 |
9 |
if (defined $EPSILON and abs $d1 - $d2 < $EPSILON) { } |
|
47
|
1 |
17 |
if $reftype1 ne $reftype2 |
|
53
|
2 |
15 |
if (defined $pkg1) { } |
|
54
|
1 |
1 |
unless defined $pkg2 and $pkg1 eq $pkg2 |
|
56
|
0 |
15 |
if defined $pkg2 |
|
64
|
6 |
10 |
if ($reftype1 eq 'ARRAY' and not $_seen_refaddrs{$refaddr1} and not $_seen_refaddrs{$refaddr2}) { } |
|
|
8 |
2 |
elsif ($reftype1 eq 'HASH' and not $_seen_refaddrs{$refaddr1} and not $_seen_refaddrs{$refaddr2}) { } |
|
68
|
2 |
4 |
$#{$d1;} < $#{$d2;} ? : |
|
70
|
2 |
1 |
if $cmpres |
|
80
|
4 |
5 |
unless (exists $d2->{$k}) |
|
82
|
1 |
4 |
if $cmpres |
|
86
|
1 |
1 |
$refaddr1 == $refaddr2 ? : |