| line |
true |
false |
branch |
|
39
|
0 |
7 |
if (my $config = delete $args{'config'}) |
|
46
|
7 |
0 |
if $format eq 'PRINTI' |
|
48
|
7 |
0 |
if (ref $format eq 'HASH') |
|
55
|
0 |
7 |
if ref $transl eq 'HASH' |
|
58
|
0 |
7 |
unless not &blessed($transl) or $transl->isa('Log::Report::Translator') |
|
66
|
0 |
7 |
unless defined $lang |
|
70
|
0 |
7 |
if (my $cr = $args{'context_rules'}) |
|
72
|
0 |
0 |
if $@ |
|
73
|
0 |
0 |
if (&blessed($cr)) { } |
|
|
0 |
0 |
elsif (ref $cr eq 'HASH') { } |
|
74
|
0 |
0 |
unless $cr->isa($tc) |
|
101
|
0 |
0 |
unless my $cr = $self->contextRules |
|
110
|
0 |
0 |
unless my $cr = $self->contextRules |
|
127
|
0 |
0 |
if ($fn =~ /\.pl$/i) { } |
|
|
0 |
0 |
elsif ($fn =~ /\.json$/i) { } |
|
131
|
0 |
0 |
if $@ |
|
132
|
0 |
0 |
unless open my $fh, '<:encoding(utf8)', $fn |
|
153
|
87 |
0 |
if index($msgid, '<') == -1 |
|
157
|
0 |
0 |
if (my $rules = $self->contextRules) { } |
|
163
|
0 |
0 |
length "$1$2" ? : |
|
170
|
0 |
0 |
unless $tr->translate($msg, $lang, $msgctxt) |