Condition Coverage

File:blib/lib/Log/Abstraction.pm
Coverage:77.5%

line%coveragecondition
198100
ABdec
0X0
100
111
scalar @_ == 1 and ref $_[0] ne "HASH"
243100
ABdec
0X0
100
111
$args{'syslog'} and not $args{'script_name'}
2440
ABdec
0X0
100
111
require File::Basename and "File::Basename"->import
24767
ABdec
000
011
1X1
$ENV{'SCRIPT_NAME'} || $0
253100
ABdec
000
011
1X1
$args{'file'} || $args{'array'}
254100
ABdec
0X0
100
111
&Scalar::Util::blessed($logger) and ref $logger eq __PACKAGE__
364100
ABdec
0X0
100
111
scalar @messages == 1 and ref $messages[0] eq "ARRAY"
37633
ABdec
000
011
1X1
&blessed($self) || $self
38650
Adec
00
11
&blessed($self) || __PACKAGE__
410100
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %class% %callstack% %message%'
42767
ABdec
0X0
100
111
exists $logger->{'sendmail'} and exists $logger->{'sendmail'}{'to'}
429100
ABdec
000
011
1X1
not defined $logger->{'sendmail'}{'level'} or $Log::Abstraction::syslog_values{$level} <= $Log::Abstraction::syslog_values{$logger->{'sendmail'}{'level'}}
43567
ABdec
0X0
100
111
defined $self->{'_last_email_sent'} && $now - $self->{'_last_email_sent'} < $min_interval
462100
Adec
00
11
$logger->{'sendmail'}{'port'} || 25
50
Adec
00
11
$logger->{'sendmail'}{'host'} || 'localhost'
477100
ABdec
000
011
1X1
not defined $syslog->{'level'} or $Log::Abstraction::syslog_values{$level} <= $syslog->{'level'}
480100
Adec
00
11
delete $syslog->{'facility'} || 'local0'
50867
ABdec
000
011
1X1
$logger->{'file'} || $logger->{'array'} || $logger->{'syslog'} || exists $logger->{'sendmail'} || $logger->{'fd'}
509100
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %class% %callstack% %message%'
51850
Adec
00
11
$ENV{$1} // ""
52750
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %class% %callstack% %message%'
5360
Adec
00
11
$ENV{$1} // ""
544100
ABdec
0X0
100
111
$level eq "notice" and $logger->can("info")
576100
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %callstack% %message%'
578100
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %class% %callstack% %message%'
586100
Adec
00
11
$ENV{$1} // ""
59850
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %callstack% %message%'
60050
Adec
00
11
$self->{'format'} || '%level%> [%timestamp%] %class% %callstack% %message%'
6080
Adec
00
11
$ENV{$1} // ""
646100
ABdec
0X0
100
111
$self->{'level'} && $self->{'level'} >= $Log::Abstraction::DEBUG
78460
ABCDdec
00000
00011
001X1
01XX1
1XXX1
$@ or not $params or ref $params ne "HASH" or not exists $params->{'warning'}
79675
ABCdec
0XX0
10X0
1100
1111
$params and ref $params eq "HASH" and exists $params->{'warning'}
824100
ABdec
000
011
1X1
$self->{'croak_on_error'} or not defined $self->{'logger'} || defined $self->{'array'}
100
ABdec
000
011
1X1
defined $self->{'logger'} || defined $self->{'array'}
829100
ABdec
000
011
1X1
$self->{'carp_on_warn'} or not defined $self->{'logger'} || defined $self->{'array'}
100
ABdec
000
011
1X1
defined $self->{'logger'} || defined $self->{'array'}