| blib/lib/Log/Sprintf.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 7 | 85.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 90 | 5 | 1 | 1 | defined $chomp and $chomp eq 'chomp' |
| line | l | !l | condition |
|---|---|---|---|
| 29 | 5 | 0 | $_[1] || {} |
| 111 | 3 | 1 | exists $_[0]{$_} or die "you forgot to pass $_; passed params were: " . join(', ', keys %{$_[0];}) |