| line |
true |
false |
branch |
|
54
|
0 |
60 |
if (@_) |
|
58
|
2 |
58 |
if defined $x xor defined $y |
|
59
|
0 |
0 |
unless defined $x or defined $y |
|
61
|
33 |
25 |
ref $x ? : |
|
62
|
33 |
25 |
ref $y ? : |
|
67
|
1 |
57 |
unless ref $a eq ref $b |
|
69
|
25 |
32 |
if (ref $a eq 'SCALAR') |
|
74
|
18 |
14 |
if (ref $a eq 'HASH') |
|
77
|
1 |
17 |
if $max != scalar keys %{$b;} |
|
78
|
1 |
16 |
if $max == 0 |
|
83
|
26 |
0 |
if exists $$b{$key} |
|
86
|
0 |
16 |
if $found != $max |
|
91
|
7 |
16 |
unless compare($$a{$key}, $$b{$key}) |
|
97
|
14 |
0 |
if (ref $a eq 'ARRAY') |
|
99
|
3 |
11 |
if $max != scalar @{$b;} |
|
100
|
4 |
7 |
if $max == 0 |
|
104
|
2 |
13 |
unless compare($$a[$i], $$b[$i]) |