| line |
true |
false |
branch |
|
128
|
0 |
6 |
!$self->{'COLOR'} ? : |
|
130
|
0 |
6 |
if $PARENT ne $$ |
|
131
|
6 |
0 |
if ($self->{'COLOR'}) { } |
|
365
|
144 |
6 |
if ($Key ne $upper) { } |
|
|
0 |
6 |
elsif ($Key eq 'LOGLEVEL') { } |
|
369
|
6 |
138 |
if ($upper eq "LOGLEVEL") |
|
370
|
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'}) |
|
414
|
36 |
6 |
unless exists $$self{"$lvl-PREFIX"} and defined $$self{"$lvl-PREFIX"} |
|
422
|
0 |
42 |
$PARENT ne $$ ? : |
|
424
|
0 |
42 |
if ($self->{'USE_THREADS'}) |
|
425
|
0 |
0 |
'threads'->can('tid') ? : |
|
426
|
0 |
0 |
$tid && $tid > 0 ? : |
|
449
|
0 |
6 |
if $PARENT ne $$ |
|
450
|
0 |
6 |
!$self->{'COLOR'} ? : |
|
451
|
5 |
1 |
unless $self->{'LOGLEVEL'} =~ /ERR/ |
|
482
|
0 |
114 |
unless ($level =~ /ERR.*|WARN.*|NOTICE|INFO.*|DEBUG/i) |
|
490
|
49 |
65 |
if $self->{'LOGLEVEL_VALUE'} < $LevelLogic{$level} |
|
493
|
42 |
23 |
if (ref $msgs eq 'SCALAR' or ref $msgs eq '') { } |
|
|
23 |
0 |
elsif (ref $msgs eq 'ARRAY') { } |
|
505
|
65 |
0 |
if ($effective_prefix =~ /\%(Subroutine|Module|Lines|Lastline)\%/i) |
|
510
|
2 |
4 |
unless ($array[3] =~ /Debug::Easy/) |
|
515
|
2 |
0 |
if ($sname eq '') { } |
|
516
|
2 |
0 |
$subroutine ne '' ? : |
|
522
|
0 |
2 |
if ($count == 2) |
|
530
|
2 |
63 |
if ($package ne '') { } |
|
532
|
2 |
0 |
if $nest |
|
536
|
63 |
0 |
if (not defined $cline or $cline eq "") |
|
544
|
65 |
0 |
$sname ne '' ? : |
|
545
|
0 |
65 |
if length $subroutine > abs $self->{'PADDING'} |
|
546
|
0 |
65 |
if length $cline > abs $self->{'LINES-PADDING'} |
|
547
|
6 |
59 |
if length $short > abs $self->{'SUBROUTINE-PADDING'} |
|
548
|
6 |
59 |
if length $sline > abs $self->{'LINE-PADDING'} |
|
550
|
0 |
65 |
!$self->{'COLOR'} ? : |
|
552
|
0 |
65 |
!$self->{'COLOR'} ? : |
|
556
|
65 |
0 |
if ($effective_prefix =~ /\%Benchmark\%/i) |
|
568
|
0 |
107 |
if (ref $msg ne "") |
|
571
|
21 |
86 |
if ($msg =~ /\n/s) { } |
|
586
|
0 |
65 |
if ($level eq 'INFO' and $self->{'LOGLEVEL'} eq 'VERBOSE') { } |
|
|
3 |
62 |
elsif ($level eq 'DEBUGMAX') { } |
|
590
|
0 |
0 |
if (ref $msg ne "") |
|
593
|
0 |
0 |
if ($msg =~ /\n/s) { } |
|
603
|
3 |
0 |
if ($self->{'LOGLEVEL'} eq "DEBUGMAX") |
|
634
|
0 |
128 |
unless defined $tmpl |
|
640
|
6 |
122 |
if ($prefix =~ /\%Lines\%/i) |
|
641
|
122 |
6 |
if ($prefix =~ /\%Lastline\%/i) |
|
642
|
122 |
6 |
if ($prefix =~ /\%Subroutine\%/i) |
|
643
|
6 |
122 |
if ($prefix =~ /\%Module\%/i) |
|
651
|
65 |
63 |
if ($first) { } |
|
670
|
0 |
0 |
if ($level eq 'INFO' and $self->{'LOGLEVEL'} eq 'VERBOSE') { } |
|
|
0 |
0 |
elsif ($level eq 'DEBUGMAX') { } |
|
673
|
0 |
0 |
if ($self->{'LOGLEVEL'} eq "DEBUGMAX") |