blib/lib/Hash/Case/Preserve.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 4 | 5 | 80.0 |
line | l | !l | condition |
---|---|---|---|
27 | 6 | 0 | $args->{'keep'} || 'LAST' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
48 | 8 | 6 | 2 | $self->{'HCP_update'} or not exists $self->{'HCP_keys'}{$lckey} |