| 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')
|