Branch Coverage

blib/lib/Debug/Easy.pm
Criterion Covered Total %
branch 48 68 70.5


line true false branch
124 0 13 if $PARENT ne $$
356 312 26 if ($Key ne $upper) { }
0 26 elsif ($Key eq 'LOGLEVEL') { }
360 13 299 if ($upper eq 'LOGLEVEL')
361 0 13 if $self->{$upper} =~ /^ERROR$/i
378 0 13 if ($self->{'COLOR'} =~ /0|FALSE|OFF|NO/i)
396 78 13 unless exists $$self{"$lvl-PREFIX"} and defined $$self{"$lvl-PREFIX"}
402 0 13 if $PARENT ne $$
434 108 139 unless ($level =~ /ERR.*|WARN.*|NOTICE|INFO.*|DEBUG/i)
441 105 142 if $LevelLogic{$self->{'LOGLEVEL'}} < $LevelLogic{$level}
444 92 50 if (ref $msgs eq 'SCALAR' or ref $msgs eq '') { }
50 0 elsif (ref $msgs eq 'ARRAY') { }
455 142 0 if ($self->{'PREFIX'} =~ /\%(Subroutine|Module|Lines|Lastline)\%/)
460 4 8 unless ($array[3] =~ /Debug::Easy/)
465 4 0 if ($sname eq '') { }
466 4 0 $subroutine ne '' ? :
472 0 4 if ($count == 2)
480 4 138 if ($package ne '') { }
482 4 0 if $nest
486 138 0 if (not defined $cline or $cline eq '')
494 142 0 $sname ne '' ? :
495 0 142 if length $subroutine > abs $self->{'PADDING'}
496 0 142 if length $cline > abs $self->{'LINES-PADDING'}
497 13 129 if length $short > abs $self->{'SUBROUTINE-PADDING'}
498 13 129 if length $sline > abs $self->{'LINE-PADDING'}
506 142 0 if ($self->{'PREFIX'} =~ /\%Benchmark\%/)
514 0 234 if (ref $msg ne '')
517 46 188 if ($msg =~ /\n/s) { }
550 0 280 $PARENT ne $$ ? :
553 0 280 if (exists $Debug::Easy::Config{'useithreads'} and $Debug::Easy::Config{'useithreads'})
576 142 138 if ($first) { }
582 6 274 if ($level eq 'INFO' and $self->{'LOGLEVEL'} eq 'VERBOSE') { }
12 262 elsif ($level eq 'DEBUGMAX') { }
586 12 0 if ($self->{'LOGLEVEL'} eq 'DEBUGMAX')