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