| line |
true |
false |
branch |
|
30
|
1 |
0 |
unless $hr |
|
34
|
0 |
1 |
if ($hr->{'sys'}) { } |
|
37
|
0 |
0 |
unless $sub |
|
49
|
0 |
1 |
$hr->{'opt'} ? : |
|
56
|
0 |
1 |
if %Log::Any:: |
|
57
|
0 |
1 |
if %Log::ger:: |
|
58
|
0 |
1 |
if %Log::Dispatch:: |
|
59
|
0 |
1 |
if %Log::Log4perl:: |
|
86
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
89
|
0 |
0 |
if (/\d/) { } |
|
92
|
0 |
0 |
if $level < 0 |
|
93
|
0 |
0 |
if $level > 8 |
|
98
|
0 |
0 |
unless defined $level |
|
139
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
142
|
0 |
0 |
if (/\d/) { } |
|
145
|
0 |
0 |
if $level < 10 |
|
146
|
0 |
0 |
if $level > 60 |
|
150
|
0 |
0 |
unless defined $level |
|
157
|
0 |
0 |
if (*LEVEL{"CODE"} and $unset) |
|
160
|
0 |
0 |
unless eval "\n require Log::ger::Util;\n Log::ger::Util::set_level(Log::OK::LEVEL);\n 1;\n " |
|
204
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
207
|
0 |
0 |
if (/\d/) { } |
|
210
|
0 |
0 |
if $level < 0 |
|
211
|
0 |
0 |
if $level > 7 |
|
216
|
0 |
0 |
unless defined $level |
|
270
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
274
|
0 |
0 |
if (/\d/) { } |
|
277
|
0 |
0 |
if $index < 0 |
|
278
|
0 |
0 |
if $index > @$levels - 1 |
|
280
|
0 |
0 |
unless grep(($level == $_), @$levels) |
|
286
|
0 |
0 |
unless defined $level |