blib/lib/Tie/RefHash.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 5 | 9 | 55.5 |
line | l | !l | condition |
---|---|---|---|
182 | 0 | 0 | $count and !1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
272 | 44 | 0 | 1 | ref $v eq 'HASH' and not tied %$v |
line | l | !l | condition |
---|---|---|---|
167 | 2 | 2 | $reg || {} |
227 | 2 | 0 | delete $$s[0]{refaddr $k} || [] |