| line |
true |
false |
branch |
|
128
|
0 |
6 |
!$self->{'COLOR'} ? : |
|
130
|
0 |
6 |
if $PARENT ne $$ |
|
131
|
6 |
0 |
if ($self->{'COLOR'}) { } |
|
363
|
144 |
6 |
if ($Key ne $upper) { } |
|
|
0 |
6 |
elsif ($Key eq 'LOGLEVEL') { } |
|
367
|
6 |
138 |
if ($upper eq "LOGLEVEL") |
|
368
|
0 |
6 |
if $self->{$upper} =~ /^ERROR$/i |
|
389
|
0 |
6 |
$Debug::Easy::Config{'useithreads'} && eval {
do {
require threads;
1
}
} ? : |
|
394
|
0 |
6 |
unless ($self->{'COLOR'}) |
|
412
|
36 |
6 |
unless exists $$self{"$lvl-PREFIX"} and defined $$self{"$lvl-PREFIX"} |
|
420
|
0 |
42 |
$PARENT ne $$ ? : |
|
422
|
0 |
42 |
if ($self->{'USE_THREADS'}) |
|
423
|
0 |
0 |
'threads'->can('tid') ? : |
|
424
|
0 |
0 |
$tid && $tid > 0 ? : |
|
447
|
0 |
6 |
if $PARENT ne $$ |
|
448
|
0 |
6 |
!$self->{'COLOR'} ? : |
|
449
|
5 |
1 |
unless $self->{'LOGLEVEL'} =~ /ERR/ |
|
480
|
0 |
114 |
unless ($level =~ /ERR.*|WARN.*|NOTICE|INFO.*|DEBUG/i) |
|
488
|
49 |
65 |
if $self->{'LOGLEVEL_VALUE'} < $LevelLogic{$level} |
|
491
|
42 |
23 |
if (ref $msgs eq 'SCALAR' or ref $msgs eq '') { } |
|
|
23 |
0 |
elsif (ref $msgs eq 'ARRAY') { } |
|
503
|
65 |
0 |
if ($effective_prefix =~ /\%(Subroutine|Module|Lines|Lastline)\%/i) |
|
508
|
2 |
4 |
unless ($array[3] =~ /Debug::Easy/) |
|
513
|
2 |
0 |
if ($sname eq '') { } |
|
514
|
2 |
0 |
$subroutine ne '' ? : |
|
520
|
0 |
2 |
if ($count == 2) |
|
528
|
2 |
63 |
if ($package ne '') { } |
|
530
|
2 |
0 |
if $nest |
|
534
|
63 |
0 |
if (not defined $cline or $cline eq "") |
|
542
|
65 |
0 |
$sname ne '' ? : |
|
543
|
0 |
65 |
if length $subroutine > abs $self->{'PADDING'} |
|
544
|
0 |
65 |
if length $cline > abs $self->{'LINES-PADDING'} |
|
545
|
6 |
59 |
if length $short > abs $self->{'SUBROUTINE-PADDING'} |
|
546
|
6 |
59 |
if length $sline > abs $self->{'LINE-PADDING'} |
|
548
|
0 |
65 |
!$self->{'COLOR'} ? : |
|
550
|
0 |
65 |
!$self->{'COLOR'} ? : |
|
554
|
65 |
0 |
if ($effective_prefix =~ /\%Benchmark\%/i) |
|
565
|
0 |
107 |
if (ref $msg ne "") |
|
568
|
21 |
86 |
if ($msg =~ /\n/s) { } |
|
583
|
0 |
65 |
if ($level eq 'INFO' and $self->{'LOGLEVEL'} eq 'VERBOSE') { } |
|
|
3 |
62 |
elsif ($level eq 'DEBUGMAX') { } |
|
587
|
0 |
0 |
if (ref $msg ne "") |
|
590
|
0 |
0 |
if ($msg =~ /\n/s) { } |
|
600
|
3 |
0 |
if ($self->{'LOGLEVEL'} eq "DEBUGMAX") |
|
631
|
0 |
128 |
unless defined $tmpl |
|
637
|
6 |
122 |
if ($prefix =~ /\%Lines\%/i) |
|
638
|
122 |
6 |
if ($prefix =~ /\%Lastline\%/i) |
|
639
|
122 |
6 |
if ($prefix =~ /\%Subroutine\%/i) |
|
640
|
6 |
122 |
if ($prefix =~ /\%Module\%/i) |
|
648
|
65 |
63 |
if ($first) { } |
|
667
|
0 |
0 |
if ($level eq 'INFO' and $self->{'LOGLEVEL'} eq 'VERBOSE') { } |
|
|
0 |
0 |
elsif ($level eq 'DEBUGMAX') { } |
|
670
|
0 |
0 |
if ($self->{'LOGLEVEL'} eq "DEBUGMAX") |