Branch Coverage

blib/lib/Log/Any/App.pm
Criterion Covered Total %
branch 156 252 61.9


line true false branch
41 104 3378 if defined $_
52 0 239 if defined $_
58 0 49 if $init_called++
66 1 48 if ($spec->{'log'} and $spec->{'init'})
68 0 1 if ($ENV{'LOG_ENV'})
82 0 6 if ($name =~ /^dir/i) { }
6 0 elsif ($name =~ /^file/i) { }
0 0 elsif ($name =~ /^screen/i) { }
0 0 elsif ($name =~ /^syslog/i) { }
0 0 elsif ($name =~ /^unixsock/i) { }
0 0 elsif ($name =~ /^array/i) { }
86 0 0 if $ospec->{'max_size'}
87 0 0 if $ospec->{'histories'}
88 0 0 if $ospec->{'max_age'}
102 0 0 $ospec->{'color'} ? :
103 0 0 $ospec->{'stderr'} ? :
125 6 0 $filter ? :
147 0 2 if (defined $ospec->{'filter_text'})
152 0 2 if (defined $ospec->{'filter_no_text'})
157 0 2 if (defined $ospec->{'filter_citext'})
162 0 2 if (defined $ospec->{'filter_no_citext'})
167 0 2 if (defined $ospec->{'filter_re'})
170 0 0 ref $ospec->{'filter_re'} eq 'Regexp' ? :
172 0 2 if (defined $ospec->{'filter_no_re'})
175 0 0 ref $ospec->{'filter_re'} eq 'Regexp' ? :
215 2 0 if ($ospec->{'category_level'})
219 0 4 if $seen_cats{$cat}++
225 2 0 if ($spec->{'category_level'})
229 0 4 if $seen_cats{$cat}++
237 0 2 if $seen_cats{$cat}++
250 42 22 if ($levels{$oname}{$c})
263 6 1 unless $cat0 eq ''
271 0 26 unless $olevel
291 5 9 if ($olevel ne $cat_level and _min_level($olevel, $cat_level) eq $cat_level) { }
301 6 8 unless ($generated_appenders{$apd_name}++)
313 1 6 $cat eq '' ? :
333 0 0 if length $dir and not -d $dir
339 0 2 if length $dir and not -d $dir
343 0 1 if ($spec->{'dump'})
377 9 1 if ($arg =~ /^-(\w+)$/)
378 1 0 if ($arg eq '$log') { }
398 1 72 unless ($arg =~ /^-(\w+)$/)
400 0 72 unless $i++ < @$args - 1
409 0 49 if (defined $opts{'log'})
414 0 49 unless $spec->{'log'}
417 6 43 if (defined $opts{'name'})
423 4 45 if (defined $opts{'level_flag_paths'})
429 0 49 if (not $spec->{'level'} and defined $opts{'level'}) { }
31 18 elsif (not $spec->{'level'}) { }
439 1 48 if (defined $opts{'category_alias'})
441 0 1 unless ref $opts{'category_alias'} eq 'HASH'
446 1 48 if (defined $opts{'category_level'})
448 0 1 unless ref $opts{'category_level'} eq 'HASH'
458 48 1 if (defined $opts{'init'})
464 2 47 if (defined $opts{'daemon'})
472 0 49 if (defined $opts{'dump'})
478 0 49 if (defined $opts{'filter_text'})
483 0 49 if (defined $opts{'filter_no_text'})
488 0 49 if (defined $opts{'filter_citext'})
493 0 49 if (defined $opts{'filter_no_citext'})
498 0 49 if (defined $opts{'filter_re'})
503 0 49 if (defined $opts{'filter_no_re'})
509 48 1 $0 ne '-e' ? :
532 0 49 if (keys %opts)
545 51 47 if (defined $is_daemon)
546 1 46 if (defined $main::IS_DAEMON)
568 2 634 if ($INC{$_})
587 200 96 unless $arg
589 95 1 if (not ref $arg or ref $arg eq 'HASH') { }
1 0 elsif (ref $arg eq 'ARRAY') { }
594 89 6 if (not ref $arg) { }
599 0 12 unless exists $_->{$k}
602 2 10 $k eq 'level' ? :
603 2 10 if $k eq 'level'
610 48 47 if $postprocess
625 0 95 $ENV{'LOG_SHOW_CATEGORY'} ? :
0 95 $ENV{'LOG_SHOW_LOCATION'} ? :
633 39 9 unless ($level)
657 0 48 $> ? :
664 2 44 if (not ref $arg and $arg and not $arg =~ /^(1|yes|true)$/i)
675 2 46 if ($ospec->{'path'} =~ m[/$])
691 0 0 unless ($level)
715 0 0 $> ? :
722 0 49 if (not ref $arg and $arg and not $arg =~ /^(1|yes|true)$/i)
735 34 9 unless ($level)
756 0 43 $ENV{'LOG_ELAPSED_TIME_IN_SCREEN'} ? :
771 4 0 unless ($level)
808 0 0 unless ($level)
828 0 0 $> ? :
835 0 49 if (not ref $arg and $arg and not $arg =~ /^(1|yes|true)$/i)
846 0 0 if ($ospec->{'path'} =~ m[/$])
874 0 0 unless ($level)
910 95 0 unless (defined $s->{'pattern'})
912 0 95 unless defined $s->{'pattern_style'}
915 0 95 unless defined $PATTERN_STYLES{$s->{'pattern_style'}}
926 0 8 if (ref $c0 eq 'ARRAY') { }
931 6 2 unless defined $a
932 2 0 if (ref $a eq 'ARRAY') { }
954 0 25 unless $level =~ /^(off|fatal|error|warn|info|debug|trace)$/i
962 95 49 $prefix ? :
963 95 49 $prefix ? :
964 95 49 $prefix ? :
965 95 49 $prefix ? :
966 95 49 $prefix ? :
972 95 49 $which ? :
975 0 144 if ($INC{'App/Options.pm'})
980 0 0 if ($App::options{$key})
989 0 0 if ($App::options{$key})
1002 0 36 if ($arg =~ /^--${pr}log[_-]?level=(.+)/)
1007 6 30 if ($arg =~ /^--${pr}log[_-]?level$/ and $i < @ARGV - 1)
1013 2 118 if ($arg =~ /^--$pr$_->[0](=(1|yes|true))?$/i)
1025 2 268 if ($ENV{$key})
1034 2 531 if ($ENV{$key})
1046 2 997 if ($exists)
1049 2 0 if defined $content
1052 2 997 defined $content ? :
1054 2 997 if (defined $content)
1063 2 995 $exists ? :
1065 2 995 if ($exists)
1078 12 726 if ($$varname)
1089 8 892 if ($$varname)
1098 18 18 $which ? :
36 108 if $level
1107 7 33 $vals{uc $l1} > $vals{uc $l2} ? :
1119 5169 0 unless $ENV{'LOGANYAPP_DEBUG'}
1120 0 0 if $Log::Any::App::dbg_ctx