| line |
true |
false |
branch |
|
44
|
1 |
290 |
if $appenderclass =~ /[^:\w]/
|
|
52
|
37 |
253 |
unless ($appenderclass->can("new"))
|
|
58
|
1 |
36 |
if $@
|
|
62
|
2 |
289 |
if $@
|
|
65
|
20 |
269 |
unless exists $params{'name'}
|
|
70
|
0 |
289 |
if ($appenderclass eq "Log::Dispatch::File" and not exists $params{'mode'})
|
|
99
|
0 |
289 |
unless ($INC{'Log/Log4perl/Config.pm'})
|
|
103
|
1 |
288 |
if ($self->{'warp_message'} and my $cref = Log::Log4perl::Config::compile_if_perl($self->{'warp_message'}))
|
|
119
|
12 |
747 |
if defined $flag
|
|
130
|
24 |
5 |
if (defined $level)
|
|
132
|
23 |
1 |
$level =~ /^(\d+)$/ ? :
|
|
150
|
22 |
561 |
if ($self->{'level'} > $Log::Log4perl::Level::PRIORITY{$level})
|
|
159
|
30 |
531 |
if ($self->{'filter'})
|
|
160
|
15 |
15 |
if ($self->{'filter'}->ok(%$p, 'log4p_category', $category, 'log4p_level', $level)) { }
|
|
170
|
502 |
44 |
unless ($self->composite)
|
|
173
|
489 |
13 |
if (not defined $self->{'warp_message'}) { }
|
|
|
11 |
2 |
elsif (not $self->{'warp_message'}) { }
|
|
|
1 |
1 |
elsif (ref $self->{'warp_message'} eq 'CODE') { }
|
|
175
|
483 |
6 |
if (ref $p->{'message'} eq "ARRAY")
|
|
177
|
1 |
510 |
unless (defined $p->{'message'}[$i])
|
|
206
|
502 |
0 |
if $self->layout
|
|
214
|
14 |
532 |
if (defined $cache) { }
|
|
237
|
0 |
215 |
if ($name)
|
|
251
|
298 |
502 |
if ($layout) { }
|
|
|
7 |
495 |
elsif (not $self->{'layout'}) { }
|
|
269
|
12 |
0 |
if ($filter)
|
|
290
|
0 |
271 |
unless (defined $self->{'appender'})
|