blib/lib/Tie/Hash/MultiKey.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 19 | 29 | 65.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
205 | 3 | 0 | 4 | $ref && $ref eq 'ARRAY' |
239 | 3 | 0 | 2 | _isarrayref($crumbs) and _isarrayref($key) |
3 | 0 | 2 | _isarrayref($crumbs) and _isarrayref($key) and $key == $crumbs | |
317 | 2 | 0 | 14 | defined $_ and defined $$sh{$_} |
348 | 116 | 1 | 11 | $_[0][7] and defined $key |
463 | 14 | 0 | 0 | exists $$kh{$_} and $$kh{$key} != $vi |
727 | 0 | 0 | 1 | ref $copy eq 'HASH' and ref($copy = tied %$copy) eq ref $self |
line | l | !l | condition |
---|---|---|---|
433 | 8 | 0 | ref $proto || $proto || 'Tie::Hash::MultiKey' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
239 | 2 | 2 | 1 | _isarrayref($crumbs) and _isarrayref($key) and $key == $crumbs or $key . $; . 'X' eq $crumbs . $; . 'X' |
727 | 2 | 0 | 1 | ref $copy eq ref $self or ref $copy eq 'HASH' and ref($copy = tied %$copy) eq ref $self |