| line |
true |
false |
branch |
|
14
|
2 |
3 |
&reftype($_[0]) || !1 ? : |
|
24
|
9 |
1 |
if ($self->{'same'}) |
|
25
|
1 |
8 |
unless $base_bless eq ref $_ |
|
29
|
6 |
1 |
$self->{'blessed'} ? : |
|
34
|
8 |
61 |
unless defined $merger |
|
38
|
2 |
29 |
if $new_ref ne 'HASH' |
|
42
|
19 |
12 |
$self->{'unique_hash'} ? : |
|
44
|
13 |
17 |
$merger_ref eq 'ARRAY' ? : |
|
|
31 |
30 |
$merger_ref eq 'HASH' ? : |
|
46
|
1 |
10 |
$_[0] < $_[1] ? : |
|
49
|
9 |
2 |
$self->{'unique_array'} ? : |
|
51
|
11 |
2 |
$new_ref eq 'ARRAY' ? : |
|
57
|
9 |
19 |
if ($r eq 'ARRAY') |
|
62
|
14 |
27 |
!$_ || exists $u{$_} ? : |
|
|
41 |
7 |
$x eq 'SCALAR' ? : |
|
64
|
1 |
1 |
$x1 eq $x2 ? : |
|
|
1 |
2 |
$x1 ? : |
|
|
2 |
3 |
do {
($x1, $x2) = (&reftype($n->[$i]), &reftype($m->[$i]));
$c == 0
} ? : |
|
|
5 |
19 |
if $c != 2 |
|
78
|
21 |
6 |
$x ne 'SCALAR' && $x eq &reftype($z{$_}) ? : |
|
|
27 |
4 |
exists $z{$_} ? : |