| line |
true |
false |
branch |
|
29
|
1 |
0 |
unless $hr |
|
33
|
0 |
1 |
if ($hr->{'sys'}) { } |
|
36
|
0 |
0 |
unless $sub |
|
59
|
0 |
0 |
$hr->{'opt'} ? : |
|
|
0 |
1 |
exists $hr->{'opt'} ? : |
|
66
|
0 |
1 |
if %Log::Any:: |
|
67
|
0 |
1 |
if %Log::ger:: |
|
68
|
0 |
1 |
if %Log::Dispatch:: |
|
69
|
0 |
1 |
if %Log::Log4perl:: |
|
96
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
99
|
0 |
0 |
if (/\d/) { } |
|
102
|
0 |
0 |
if $level < 0 |
|
103
|
0 |
0 |
if $level > 8 |
|
108
|
0 |
0 |
unless defined $level |
|
149
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
152
|
0 |
0 |
if (/\d/) { } |
|
155
|
0 |
0 |
if $level < 10 |
|
156
|
0 |
0 |
if $level > 60 |
|
160
|
0 |
0 |
unless defined $level |
|
167
|
0 |
0 |
if (*LEVEL{"CODE"} and $unset) |
|
170
|
0 |
0 |
unless eval "\n require Log::ger::Util;\n Log::ger::Util::set_level(Log::OK::LEVEL);\n 1;\n " |
|
214
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
217
|
0 |
0 |
if (/\d/) { } |
|
220
|
0 |
0 |
if $level < 0 |
|
221
|
0 |
0 |
if $level > 7 |
|
226
|
0 |
0 |
unless defined $level |
|
280
|
0 |
0 |
if $value eq "" or $value eq 0 |
|
284
|
0 |
0 |
if (/\d/) { } |
|
287
|
0 |
0 |
if $index < 0 |
|
288
|
0 |
0 |
if $index > @$levels - 1 |
|
290
|
0 |
0 |
unless grep(($level == $_), @$levels) |
|
296
|
0 |
0 |
unless defined $level |