| blib/lib/Log/ger/Output/Perl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 0 | 1 | if keys %plugin_conf |
| 37 | 6 | 0 | if (my $act = $$action{Log::ger::Util::string_level($lvl)}) |
| 39 | 0 | 6 | ref $msg eq 'ARRAY' ? : |
| 40 | 1 | 5 | if ($act eq 'warn') { } |
| 1 | 4 | elsif ($act eq 'carp') { } | |
| 1 | 3 | elsif ($act eq 'cluck') { } | |
| 1 | 2 | elsif ($act eq 'croak') { } | |
| 1 | 1 | elsif ($act eq 'confess') { } |