| line |
!l |
l&&!r |
l&&r |
condition |
|
23
|
4630 |
0 |
0 |
defined $separator and length $separator > 0 |
|
|
4630 |
0 |
0 |
defined $separator and length $separator > 0 |
|
|
0 |
0 |
0 |
defined $separator and length $separator > 0 |
|
379
|
0 |
48 |
8 |
$level and not $valid_level |
|
|
0 |
0 |
48 |
$level and $valid_level |
|
439
|
0 |
0 |
0 |
$level and not $dest |
|
474
|
0 |
0 |
0 |
$dest and not $level |
|
507
|
0 |
0 |
0 |
$package and not $package =~ /^\s+$/ |
|
544
|
0 |
0 |
0 |
UNIVERSAL::isa($clone, $this_package) and ref $$self{'prefix'} eq 'CODE' |
|
592
|
0 |
0 |
0 |
$_[0] and $_[0] =~ /^-/ |
|
604
|
0 |
0 |
0 |
$terse and not defined $indent |
|
620
|
0 |
0 |
0 |
defined $dumps and ref $dumps eq 'ARRAY' |
|
621
|
0 |
0 |
0 |
defined $names and ref $names eq 'ARRAY' |
|
789
|
0 |
0 |
0 |
ref $level eq 'HASH' and $args = $level |
|
838
|
6273 |
0 |
6272 |
ref $level eq 'HASH' and $args = $level |
|
891
|
7556 |
4989 |
0 |
$status and my $packages = $$self{'packages'} |
|
915
|
0 |
0 |
0 |
$status and $log_called_package =~ /^($dont_rx)$/ |
|
927
|
0 |
0 |
0 |
$do_match and $dont_match |
|
968
|
4989 |
0 |
0 |
exists $$args{'prefix'} and $log_level =~ /^D_/ |
|
|
4989 |
0 |
0 |
exists $$args{'prefix'} and $log_level =~ /^D_/ and $log_file =~ /^(STDOUT|STDERR)$/ |
|
1005
|
14966 |
0 |
0 |
my $ref = ref $msg and $dump_refs |
|
1012
|
0 |
0 |
0 |
ref $msg eq 'CODE' and $code_resolve_cnt++ > $code_resolve_cnt_max |
|
1025
|
4989 |
0 |
0 |
$add_dev_prefix and not $outmsg[-1] =~ /\n$/ms |
|
|
4989 |
0 |
0 |
$add_dev_prefix and not $outmsg[-1] =~ /\n$/ms and not defined $$args{'n'} |
|
1254
|
0 |
0 |
0 |
$fh and $file_no |
|
1477
|
4877 |
112 |
0 |
$level =~ /^(CRIT|FATAL)$/ and defined $$args{'handle_fatals'} ? $$args{'handle_fatals'} : $$self{'handle_fatals'} |
| line |
l |
!l |
condition |
|
23
|
0 |
1 |
$ENV{'LOG_PACKAGES_DEBUG'} ||= 0 |
|
|
1 |
0 |
$ENV{'LOG_FILTER'} ||= 'ON' |
|
|
0 |
1 |
$ENV{'LOG_INTERNAL_DEBUG'} ||= 0 |
|
370
|
56 |
0 |
shift() || '' |
|
374
|
48 |
8 |
shift() || '' |
|
421
|
0 |
0 |
shift() || '' |
|
422
|
0 |
0 |
shift() || '' |
|
501
|
0 |
0 |
$$self{'packages_array'} ||= [] |
|
502
|
0 |
0 |
$$packages[0] ||= [] |
|
503
|
0 |
0 |
$$packages[1] ||= [] |
|
528
|
0 |
0 |
$$self{'packages'} ||= [] |
|
595
|
0 |
0 |
$$args{-'n'} || $$args{-'names'} || undef |
|
597
|
0 |
0 |
$$args{-'pure'} || 0 |
|
598
|
0 |
0 |
$$args{-'deep'} || 0 |
|
600
|
0 |
0 |
$$args{-'id'} || 0 |
|
601
|
0 |
0 |
$$args{-'terse'} || 0 |
|
603
|
0 |
0 |
$$args{-'deparse'} || 0 |
|
609
|
0 |
0 |
shift() || undef |
|
610
|
0 |
0 |
shift() || 0 |
|
611
|
0 |
0 |
shift() || 0 |
|
613
|
0 |
0 |
shift() || 0 |
|
614
|
0 |
0 |
shift() || 0 |
|
616
|
0 |
0 |
shift() || 0 |
|
769
|
0 |
926 |
$$args{'backstack'} || 0 |
|
797
|
0 |
0 |
$$self{'log_level'} || 'DEFAULT' |
|
848
|
12545 |
0 |
$$args{'log_level'} || $$self{'log_level'} || $ENV{'LOG_LEVEL'} || 'DEFAULT' |
|
876
|
0 |
12545 |
$$args{'backstack'} || 0 |
|
1035
|
0 |
1853 |
$$self{'n'} || "\n" |
|
1048
|
4989 |
0 |
$$args{-'level'} ||= 'INFO' |
|
1049
|
4989 |
0 |
$$args{-'message'} ||= ' - -- NO MESSAGE -- - ' |
|
1093
|
0 |
0 |
$$args{-'level'} ||= 'INFO' |
|
1094
|
0 |
0 |
$$args{-'message'} ||= ' - -- NO MESSAGE -- - ' |
|
1115
|
0 |
0 |
(ref $self ? 2 : $self) || 2 |
|
1126
|
2778 |
0 |
shift() || (ref $self ? 0 : $self) || 0 |
|
1149
|
926 |
0 |
shift() || 0 |
|
1168
|
0 |
0 |
$f{$_} ||= 'undef' |
|
1226
|
3 |
0 |
$$args{'log'} || $class || 'DEFAULT' |
|
1275
|
4989 |
0 |
$$args{-'level'} || 'DEFAULT' |
|
1450
|
4989 |
0 |
$$args{-'level'} || 'CLEAN' |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
423
|
0 |
0 |
0 |
$level or $dest |
|
555
|
6 |
0 |
0 |
ref $self || $self || $this_package |
|
589
|
0 |
0 |
0 |
ref $self || $self |
|
594
|
0 |
0 |
0 |
$$args{-'d'} || $$args{-'dump'} || $self |
|
602
|
0 |
0 |
0 |
$$args{-'p'} || $$args{-'pad'} || ' ' x $default_pad |
|
608
|
0 |
0 |
0 |
shift() || $self |
|
612
|
0 |
0 |
0 |
shift() || $default_indent |
|
615
|
0 |
0 |
0 |
shift() || ' ' x $default_pad |
|
796
|
0 |
0 |
0 |
$$self{"log_file_$level"} || $$self{'log_file'} |
|
|
0 |
0 |
0 |
$$args{'log_file'} ||= $$self{"log_file_$level"} || $$self{'log_file'} |
|
797
|
0 |
0 |
0 |
$$args{'log_level'} ||= $$self{'log_level'} || 'DEFAULT' |
|
842
|
0 |
12545 |
0 |
$$args{'level'} || $level |
|
847
|
0 |
6273 |
0 |
$$self{"log_file_$level"} || $$self{'log_file'} |
|
|
6272 |
6273 |
0 |
$$args{'log_file'} ||= $$self{"log_file_$level"} || $$self{'log_file'} |
|
967
|
4989 |
0 |
0 |
$$args{'log_file'} || $self->log_file($level) || $self->log_file |
|
1047
|
0 |
0 |
4989 |
$$args{-'terse'} ||= $$self{'terse'} |
|
1092
|
0 |
0 |
0 |
$$args{-'terse'} ||= $$self{'terse'} |
|
1215
|
0 |
3 |
0 |
ref $self || $self |
|
1227
|
2 |
1 |
0 |
$LOGS{$log} ||= $class eq $this_package ? $self : $this_package->new(@_) |
|
1288
|
0 |
4989 |
0 |
$file ||= $$args{'log_file'} |
|
1291
|
4989 |
0 |
0 |
$file ||= $$self{"log_file_$level"} |
|
1294
|
4989 |
0 |
0 |
$file ||= $$self{'log_file'} |
|
1297
|
4989 |
0 |
0 |
$file ||= $LEVEL_FHS{$level} |
|
1300
|
4989 |
0 |
0 |
$file ||= $default_fh |
|
1411
|
4989 |
0 |
0 |
$$self{'unbuffer'} or $$args{'unbuffer'} |
|
1457
|
4989 |
0 |
0 |
$fh ||= $FHS_NA{$default_fh} |
|
1470
|
4989 |
0 |
0 |
fileno $_fh or $_fh = $FHS_NA{$_fh} |
|
1492
|
0 |
0 |
0 |
$$args{'QUIT'} || $$args{'EXIT'} || $LOG_CODE{'QUIT'} |