Branch Coverage

blib/lib/Log/Contextual/WarnLogger.pm
Criterion Covered Total %
branch 23 26 88.4


line true false branch
22 15 0 if $self->$is_name
28 16 66 if $ENV{$self->{'env_prefix'} . '_' . uc($level)}
30 34 32 unless $upto
44 5 4 if $name eq "DESTROY"
54 0 3 if $self->$is_name
62 2 18 if $ENV{$prefix_field}
65 2 16 if defined $ENV{$prefix_field} and not $ENV{$prefix_field}
70 6 10 if ($upto)
74 2 4 unless defined $self->{'level_num'}{$upto}
80 3 7 if not $self->{'custom_levels'}
89 2 2 if defined $levels and ref $levels ne 'ARRAY' || !@$levels
105 0 9 unless $self->{'env_prefix'} = $args->{'env_prefix'}
113 11 4 unless $message =~ /\n$/