| line |
true |
false |
branch |
|
84
|
1 |
84 |
if $IMPORT_CALLED{$caller_pkg}++
|
|
89
|
27 |
57 |
if (exists $tags{':easy'})
|
|
95
|
1 |
83 |
if (exists $tags{':no_extra_logdie_message'})
|
|
100
|
42 |
42 |
if (exists $tags{'get_logger'})
|
|
108
|
30 |
54 |
if (exists $tags{':levels'})
|
|
124
|
27 |
57 |
if (exists $tags{':easy'})
|
|
133
|
27 |
162 |
if $level eq "ALWAYS"
|
|
136
|
0 |
0 |
unless $Log::Log4perl::Logger::INITIALIZED or $Log::Log4perl::Logger::NON_INIT_WARNED
|
|
155
|
0 |
0 |
unless $Log::Log4perl::Logger::INITIALIZED or $Log::Log4perl::Logger::NON_INIT_WARNED
|
|
159
|
7 |
0 |
$LOGDIE_MESSAGE_ON_STDERR ? :
|
|
165
|
0 |
0 |
unless $Log::Log4perl::Logger::INITIALIZED or $Log::Log4perl::Logger::NON_INIT_WARNED
|
|
173
|
0 |
0 |
unless $Log::Log4perl::Logger::INITIALIZED or $Log::Log4perl::Logger::NON_INIT_WARNED
|
|
177
|
5 |
1 |
if $LOGDIE_MESSAGE_ON_STDERR
|
|
182
|
27 |
57 |
if (exists $tags{':nowarn'})
|
|
187
|
1 |
83 |
if (exists $tags{':nostrict'})
|
|
192
|
1 |
83 |
if (exists $tags{':resurrect'})
|
|
194
|
0 |
1 |
unless (Log::Log4perl::Util::module_available($FILTER_MODULE))
|
|
198
|
0 |
1 |
unless eval "require $FILTER_MODULE"
|
|
202
|
28 |
1 |
if ($status = Filter::Util::Call::filter_read()) > 0
|
|
209
|
0 |
84 |
if (keys %tags)
|
|
239
|
2 |
1 |
unless $Log::Log4perl::Logger::INITIALIZED
|
|
248
|
61 |
117 |
if ($class ne "Log::Log4perl")
|
|
262
|
0 |
9 |
if ($class ne "Log::Log4perl")
|
|
277
|
0 |
9 |
if (ref $class or $class =~ /^\d+$/)
|
|
293
|
0 |
9 |
if (not @args) { }
|
|
297
|
4 |
6 |
if ($arg =~ /^\d+$/) { }
|
|
|
6 |
0 |
elsif (ref $arg eq 'HASH') { }
|
|
316
|
6 |
4 |
if ($logger->{'file'} =~ /^stderr$/i) { }
|
|
|
0 |
4 |
elsif ($logger->{'file'} =~ /^stdout$/i) { }
|
|
327
|
1 |
3 |
if ($logger->{'file'} =~ s/^(:.*?)>/>/)
|
|
331
|
2 |
2 |
$2 ? :
|
|
380
|
24 |
227 |
if (@_ == 0) { }
|
|
|
126 |
101 |
elsif (@_ == 1) { }
|
|
414
|
3 |
358 |
if (defined $category and exists $WRAPPERS_REGISTERED{$category})
|
|
437
|
0 |
1 |
unless defined $name
|
|
449
|
4 |
0 |
if $_[0] eq "Log::Log4perl"
|
|
453
|
0 |
4 |
if ($delta == 0)
|
|
458
|
1 |
3 |
if (defined $appenders) { }
|
|
463
|
0 |
1 |
unless exists $Log::Log4perl::Logger::APPENDER_BY_NAME{$_}
|
|
469
|
3 |
0 |
unless defined $appenders
|
|
477
|
2 |
3 |
if ($delta > 0) { }
|
|
485
|
5 |
0 |
if $app->threshold($new_thres) == $new_thres
|
|
494
|
1 |
0 |
if $_[0] eq "Log::Log4perl"
|
|
498
|
1 |
0 |
if (defined $name and exists $Log::Log4perl::Logger::APPENDER_BY_NAME{$name}) { }
|
|
512
|
1 |
0 |
if $_[0] eq "Log::Log4perl"
|
|
573
|
0 |
27 |
unless (exists $Log::Log4perl::EASY_CLOSURES->{$caller_pkg})
|
|
600
|
1 |
14 |
if ($logger == $Log::Log4perl::EASY_CLOSURES->{$caller_pkg}{$entry})
|