| line |
true |
false |
branch |
|
23
|
15 |
0 |
if $self->$is_name |
|
29
|
16 |
66 |
if $ENV{$self->{'env_prefix'} . '_' . uc($level)} |
|
31
|
34 |
32 |
unless $upto |
|
45
|
5 |
4 |
if $name eq 'DESTROY' |
|
55
|
0 |
3 |
if $self->$is_name |
|
63
|
2 |
18 |
if $ENV{$prefix_field} |
|
66
|
2 |
16 |
if defined $ENV{$prefix_field} and not $ENV{$prefix_field} |
|
71
|
6 |
10 |
if ($upto) |
|
75
|
2 |
4 |
unless defined $self->{'level_num'}{$upto} |
|
81
|
3 |
7 |
if not $self->{'custom_levels'} |
|
90
|
2 |
2 |
if defined $levels and ref $levels ne 'ARRAY' || !@$levels |
|
106
|
0 |
9 |
unless $self->{'env_prefix'} = $args->{'env_prefix'} |
|
114
|
11 |
4 |
unless $message =~ /\n$/ |