blib/lib/Tie/StrictHash.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 24 | 50.0 |
line | true | false | branch |
---|---|---|---|
106 | 0 | 1 | if (grep {$_ eq 'warn';} @_) { } |
107 | 0 | 0 | $confess ? : |
109 | 0 | 1 | $confess ? : |
111 | 0 | 0 | if $_ ne 'warn' |
212 | 0 | 4 | if @_ == 1 |
219 | 0 | 2 | if $@ |
247 | 0 | 1 | if $@ |
270 | 0 | 1 | if $@ |
387 | 1 | 0 | unless $locked |
396 | 1 | 4 | unless $locked or exists $$hash{$key} |
406 | 2 | 0 | unless $locked |
415 | 1 | 7 | unless exists $$hash{$key} |