Branch Coverage

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


line true false branch
40 104 3378 if defined $_
51 0 239 if defined $_
57 0 49 if $init_called++
65 1 48 if ($spec->{'log'} and $spec->{'init'})
67 0 1 if ($ENV{'LOG_ENV'})
81 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) { }
85 0 0 if $ospec->{'max_size'}
86 0 0 if $ospec->{'histories'}
87 0 0 if $ospec->{'max_age'}
101 0 0 $ospec->{'color'} ? :
102 0 0 $ospec->{'stderr'} ? :
124 6 0 $filter ? :
146 0 2 if (defined $ospec->{'filter_text'})
151 0 2 if (defined $ospec->{'filter_no_text'})
156 0 2 if (defined $ospec->{'filter_citext'})
161 0 2 if (defined $ospec->{'filter_no_citext'})
166 0 2 if (defined $ospec->{'filter_re'})
169 0 0 ref $ospec->{'filter_re'} eq 'Regexp' ? :
171 0 2 if (defined $ospec->{'filter_no_re'})
174 0 0 ref $ospec->{'filter_re'} eq 'Regexp' ? :
214 2 0 if ($ospec->{'category_level'})
218 0 4 if $seen_cats{$cat}++
224 2 0 if ($spec->{'category_level'})
228 0 4 if $seen_cats{$cat}++
236 0 2 if $seen_cats{$cat}++
249 42 22 if ($levels{$oname}{$c})
262 6 1 unless $cat0 eq ''
270 0 26 unless $olevel
290 5 9 if ($olevel ne $cat_level and _min_level($olevel, $cat_level) eq $cat_level) { }
300 6 8 unless ($generated_appenders{$apd_name}++)
312 1 6 $cat eq '' ? :
332 0 0 if length $dir and not -d $dir
338 0 2 if length $dir and not -d $dir
342 0 1 if ($spec->{'dump'})
376 9 1 if ($arg =~ /^-(\w+)$/)
377 1 0 if ($arg eq '$log') { }
397 1 72 unless ($arg =~ /^-(\w+)$/)
399 0 72 unless $i++ < @$args - 1
408 0 49 if (defined $opts{'log'})
413 0 49 unless $spec->{'log'}
416 6 43 if (defined $opts{'name'})
422 4 45 if (defined $opts{'level_flag_paths'})
428 0 49 if (not $spec->{'level'} and defined $opts{'level'}) { }
31 18 elsif (not $spec->{'level'}) { }
438 1 48 if (defined $opts{'category_alias'})
440 0 1 unless ref $opts{'category_alias'} eq 'HASH'
445 1 48 if (defined $opts{'category_level'})
447 0 1 unless ref $opts{'category_level'} eq 'HASH'
457 48 1 if (defined $opts{'init'})
463 2 47 if (defined $opts{'daemon'})
471 0 49 if (defined $opts{'dump'})
477 0 49 if (defined $opts{'filter_text'})
482 0 49 if (defined $opts{'filter_no_text'})
487 0 49 if (defined $opts{'filter_citext'})
492 0 49 if (defined $opts{'filter_no_citext'})
497 0 49 if (defined $opts{'filter_re'})
502 0 49 if (defined $opts{'filter_no_re'})
508 48 1 $0 ne '-e' ? :
531 0 49 if (keys %opts)
544 51 47 if (defined $is_daemon)
545 1 46 if (defined $main::IS_DAEMON)
567 2 634 if ($INC{$_})
586 200 96 unless $arg
588 95 1 if (not ref $arg or ref $arg eq 'HASH') { }
1 0 elsif (ref $arg eq 'ARRAY') { }
593 89 6 if (not ref $arg) { }
598 0 12 unless exists $_->{$k}
601 2 10 $k eq 'level' ? :
602 2 10 if $k eq 'level'
609 48 47 if $postprocess
624 0 95 $ENV{'LOG_SHOW_CATEGORY'} ? :
0 95 $ENV{'LOG_SHOW_LOCATION'} ? :
632 39 9 unless ($level)
656 0 48 $> ? :
663 2 44 if (not ref $arg and $arg and not $arg =~ /^(1|yes|true)$/i)
674 2 46 if ($ospec->{'path'} =~ m[/$])
690 0 0 unless ($level)
714 0 0 $> ? :
721 0 49 if (not ref $arg and $arg and not $arg =~ /^(1|yes|true)$/i)
734 34 9 unless ($level)
755 0 43 $ENV{'LOG_ELAPSED_TIME_IN_SCREEN'} ? :
770 4 0 unless ($level)
807 0 0 unless ($level)
827 0 0 $> ? :
834 0 49 if (not ref $arg and $arg and not $arg =~ /^(1|yes|true)$/i)
845 0 0 if ($ospec->{'path'} =~ m[/$])
873 0 0 unless ($level)
909 95 0 unless (defined $s->{'pattern'})
911 0 95 unless defined $s->{'pattern_style'}
914 0 95 unless defined $PATTERN_STYLES{$s->{'pattern_style'}}
925 0 8 if (ref $c0 eq 'ARRAY') { }
930 6 2 unless defined $a
931 2 0 if (ref $a eq 'ARRAY') { }
953 0 25 unless $level =~ /^(off|fatal|error|warn|info|debug|trace)$/i
961 95 49 $prefix ? :
962 95 49 $prefix ? :
963 95 49 $prefix ? :
964 95 49 $prefix ? :
965 95 49 $prefix ? :
971 95 49 $which ? :
974 0 144 if ($INC{'App/Options.pm'})
979 0 0 if ($App::options{$key})
988 0 0 if ($App::options{$key})
1001 0 36 if ($arg =~ /^--${pr}log[_-]?level=(.+)/)
1006 6 30 if ($arg =~ /^--${pr}log[_-]?level$/ and $i < @ARGV - 1)
1012 2 118 if ($arg =~ /^--$pr$_->[0](=(1|yes|true))?$/i)
1024 2 268 if ($ENV{$key})
1033 2 531 if ($ENV{$key})
1045 2 997 if ($exists)
1048 2 0 if defined $content
1051 2 997 defined $content ? :
1053 2 997 if (defined $content)
1062 2 995 $exists ? :
1064 2 995 if ($exists)
1077 12 726 if ($$varname)
1088 8 892 if ($$varname)
1097 18 18 $which ? :
36 108 if $level
1106 7 33 $vals{uc $l1} > $vals{uc $l2} ? :
1118 5169 0 unless $ENV{'LOGANYAPP_DEBUG'}
1119 0 0 if $Log::Any::App::dbg_ctx