| line |
true |
false |
branch |
|
27
|
37 |
2 |
if ($def1) { } |
|
28
|
1 |
36 |
unless $def2 |
|
30
|
1 |
1 |
$def2 ? : |
|
37
|
15 |
21 |
if (not $reftype1 || $reftype2) { } |
|
|
2 |
19 |
elsif ($reftype1 xor $reftype2) { } |
|
43
|
1 |
18 |
if $reftype1 ne $reftype2 |
|
49
|
2 |
16 |
if (defined $pkg1) { } |
|
50
|
1 |
1 |
unless defined $pkg2 and $pkg1 eq $pkg2 |
|
52
|
0 |
16 |
if defined $pkg2 |
|
60
|
7 |
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}) { } |
|
64
|
2 |
5 |
$#{$d1;} < $#{$d2;} ? : |
|
66
|
3 |
1 |
if $cmpres |
|
76
|
4 |
5 |
unless (exists $d2->{$k}) |
|
78
|
1 |
4 |
if $cmpres |
|
82
|
1 |
1 |
$refaddr1 == $refaddr2 ? : |