| line |
true |
false |
branch |
|
20
|
1 |
2 |
if grep {ref $_;} values %{$_[0];}
|
|
24
|
1 |
1 |
wantarray ? :
|
|
31
|
1 |
19 |
wantarray ? :
|
|
58
|
2 |
4 |
unless (@rest)
|
|
59
|
0 |
2 |
wantarray ? :
|
|
62
|
1 |
3 |
if grep {ref $_ ne 'HASH';} @rest
|
|
74
|
1 |
3 |
unless @$common_keys
|
|
78
|
2 |
3 |
if perl5i::2::equal::are_equal($$base{$key}, $$hash{$key})
|
|
83
|
2 |
1 |
wantarray ? :
|
|
101
|
2 |
4 |
unless (@rest)
|
|
102
|
0 |
2 |
wantarray ? :
|
|
105
|
1 |
3 |
if grep {ref $_ ne 'HASH';} @rest
|
|
119
|
0 |
1 |
wantarray ? :
|
|
|
1 |
3 |
unless %base
|
|
125
|
1 |
4 |
unless perl5i::2::equal::are_equal($$base{$key}, $$hash{$key})
|
|
130
|
2 |
0 |
wantarray ? :
|