blib/lib/Log/JSON/Lines.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 26 | 57.6 |
line | true | false | branch |
---|---|---|---|
8 | 1 | 0 | defined $level ? : |
39 | 0 | 9 | unless $self->levels->{$level} |
40 | 5 | 4 | if $self->levels->{$level} > $self->level |
41 | 0 | 4 | !ref($msg) ? : |
49 | 4 | 4 | if $caller[0] eq 'Log::JSON::Lines' |
51 | 4 | 0 | if $caller[1] =~ m[([^/]+)$] |
52 | 4 | 0 | if $caller[2] =~ /(\d+)/ |
53 | 4 | 0 | if $caller[3] =~ /([^:]+)$/ |
56 | 0 | 4 | !($_->{'module'} =~ /^main$/) ? : |
60 | 0 | 4 | $_->{'sub'} ? : |
62 | 4 | 0 | if $_ and $_->{'module'} and $_->{'line'} |
63 | 0 | 4 | unless $msg->{'stacktrace'} |
65 | 0 | 4 | unless open my $fh, '>>', $self->{'_file'} |