blib/lib/Hash/Rename.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 8 | 100.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
22 | 19 | 1 | 1 | defined $args{'strict'} and exists $new_hash{$key} |
27 | 16 | 3 | 1 | $args{'recurse'} and (ref $val || '') eq 'HASH' |
line | l | !l | condition |
---|---|---|---|
27 | 1 | 3 | ref $val || '' |