| line |
true |
false |
branch |
|
127
|
0 |
13 |
if $PARENT ne $$
|
|
359
|
312 |
26 |
if ($Key ne $upper) { }
|
|
|
0 |
26 |
elsif ($Key eq 'LOGLEVEL') { }
|
|
363
|
13 |
299 |
if ($upper eq 'LOGLEVEL')
|
|
364
|
0 |
13 |
if $self->{$upper} =~ /^ERROR$/i
|
|
381
|
0 |
13 |
if ($self->{'COLOR'} =~ /0|FALSE|OFF|NO/i)
|
|
399
|
78 |
13 |
unless exists $$self{"$lvl-PREFIX"} and defined $$self{"$lvl-PREFIX"}
|
|
405
|
0 |
13 |
if $PARENT ne $$
|
|
437
|
108 |
139 |
unless ($level =~ /ERR.*|WARN.*|NOTICE|INFO.*|DEBUG/i)
|
|
444
|
105 |
142 |
if $LevelLogic{$self->{'LOGLEVEL'}} < $LevelLogic{$level}
|
|
447
|
92 |
50 |
if (ref $msgs eq 'SCALAR' or ref $msgs eq '') { }
|
|
|
50 |
0 |
elsif (ref $msgs eq 'ARRAY') { }
|
|
458
|
142 |
0 |
if ($self->{'PREFIX'} =~ /\%(Subroutine|Module|Lines|Lastline)\%/)
|
|
463
|
4 |
8 |
unless ($array[3] =~ /Debug::Easy/)
|
|
468
|
4 |
0 |
if ($sname eq '') { }
|
|
469
|
4 |
0 |
$subroutine ne '' ? :
|
|
475
|
0 |
4 |
if ($count == 2)
|
|
483
|
4 |
138 |
if ($package ne '') { }
|
|
485
|
4 |
0 |
if $nest
|
|
489
|
138 |
0 |
if (not defined $cline or $cline eq '')
|
|
497
|
142 |
0 |
$sname ne '' ? :
|
|
498
|
0 |
142 |
if length $subroutine > abs $self->{'PADDING'}
|
|
499
|
0 |
142 |
if length $cline > abs $self->{'LINES-PADDING'}
|
|
500
|
13 |
129 |
if length $short > abs $self->{'SUBROUTINE-PADDING'}
|
|
501
|
13 |
129 |
if length $sline > abs $self->{'LINE-PADDING'}
|
|
509
|
142 |
0 |
if ($self->{'PREFIX'} =~ /\%Benchmark\%/)
|
|
517
|
0 |
234 |
if (ref $msg ne '')
|
|
520
|
46 |
188 |
if ($msg =~ /\n/s) { }
|
|
553
|
0 |
280 |
$PARENT ne $$ ? :
|
|
556
|
0 |
280 |
if (exists $Debug::Easy::Config{'useithreads'} and $Debug::Easy::Config{'useithreads'})
|
|
579
|
142 |
138 |
if ($first) { }
|
|
585
|
6 |
274 |
if ($level eq 'INFO' and $self->{'LOGLEVEL'} eq 'VERBOSE') { }
|
|
|
12 |
262 |
elsif ($level eq 'DEBUGMAX') { }
|
|
589
|
12 |
0 |
if ($self->{'LOGLEVEL'} eq 'DEBUGMAX')
|