| line |
true |
false |
branch |
|
77
|
1 |
1 |
if ($arg eq 'env_debug') { } |
|
85
|
7 |
1 |
unless (keys %want_export) |
|
92
|
63 |
9 |
if ($want_export{$f}) |
|
98
|
15 |
1 |
if ($want_export{$f}) |
|
99
|
1 |
14 |
if ($env_debug) { } |
|
127
|
9 |
8 |
if not $ENV{$ENV_DEBUG} or $log_level_map{'DEBUG'} < $log_level_map{uc $LOG_LEVEL} |
|
144
|
1 |
1 |
if not $ENV{$ENV_DEBUG} or $log_level_map{'DEBUG'} < $log_level_map{uc $LOG_LEVEL} |
|
165
|
1 |
39 |
unless $log_level_map{$tag} >= $_log_level |
|
176
|
6 |
33 |
if ($full) { } |
|
191
|
31 |
8 |
if (@_ == 1 and defined $_[0]) { } |
|
|
8 |
0 |
elsif (@_ >= 2) { } |
|
192
|
2 |
29 |
$AUTODUMP ? : |
|
195
|
2 |
6 |
$AUTODUMP ? : |
|
198
|
38 |
1 |
if ($ESCAPE_WHITESPACE) |
|
205
|
6 |
33 |
if ($COLOR) |
|
206
|
6 |
0 |
if $$DEFAULT_COLOR{lc $tag}{'text'} |
|
209
|
6 |
0 |
if $$DEFAULT_COLOR{lc $tag}{'background'} |
|
252
|
2 |
1 |
if (blessed $value and my $stringify = overload::Method($value, '""') || overload::Method($value, '0+')) |
|
261
|
1 |
0 |
if (blessed $value and my $numeric = overload::Method($value, '0+') || overload::Method($value, '""')) |
|
269
|
3 |
3 |
if (defined $value and ref $value) |