Condition Coverage

File:blib/lib/Object/Configure.pm
Coverage:71.8%

line%coveragecondition
412100
Adec
00
11
$_[1] || {}
415100
ABdec
000
011
1X1
not defined $class or $class eq ""
429100
ABdec
000
011
1X1
ref $value eq "CODE" or &blessed($value)
434100
ABdec
0X0
100
111
exists $params->{'logger'} and ref $params->{'logger'} eq "ARRAY"
454100
ABdec
000
011
1X1
$config_dirs or -r $config_file
468100
ABdec
0X0
100
111
$ancestor_config_file and $ancestor_config_file eq $config_file
47350
ABCdec
0XX0
10X0
1100
1111
$ancestor_config_file and -r $ancestor_config_file and not $tracked_files{$ancestor_config_file}
48950
ABCdec
0XX0
10X0
1100
1111
$config_file and not $tracked_files{$config_file} and -r $config_file
52650
Adec
00
11
$class_order{$Object::Configure::b->{'class'}} // 999
50
Adec
00
11
$class_order{$Object::Configure::a->{'class'}} // 999
59833
ABdec
0X0
100
111
$params->{'config_path'} and -f $params->{'config_path'}
608100
ABdec
0X0
100
111
&blessed($logger) && $logger->isa('Log::Abstraction')
100
ABdec
0X0
100
111
not ref $logger and $logger eq "NULL"
64067
ABdec
0X0
100
111
exists $params->{'logger'} and ref $params->{'logger'}
64133
ABdec
0X0
100
111
$array and not $params->{'logger'}{'array'}
64533
ABdec
0X0
100
111
$array and not $params->{'logger'}{'array'}
678100
Adec
00
11
$base_ext //= ""
69167
ABdec
0X0
100
111
-r $pattern and -f $pattern
69767
ABdec
0X0
100
111
$config_dirs and ref $config_dirs eq "ARRAY"
70967
ABdec
0X0
100
111
-r $pattern and -f $pattern
753100
ABdec
0X0
100
111
not @isa and $class ne "UNIVERSAL"
772100
ABdec
0X0
100
111
ref $overlay->{$key} eq "HASH" and ref $result->{$key} eq "HASH"
103850
Adec
00
11
$params{'interval'} || 10
113733
ABdec
0X0
100
111
$pid =~ /\A[0-9]+\z/ and $pid > 0
114467
ABdec
0X0
100
111
$kid == 0 and &Object::Configure::time() < $deadline
114667
ABdec
0X0
100
111
$kid == 0 and &Object::Configure::time() < $deadline
130167
ABdec
000
011
1X1
not $stored_stat or $current_stat->mtime > $stored_stat->mtime
133750
ABCdec
0XX0
10X0
1100
1111
$obj->{'_config_files'} and ref $obj->{'_config_files'} eq "ARRAY" and @{$obj->{'_config_files'};}
134133
ABdec
000
011
1X1
$obj->{'_config_file'} || $obj->{'config_file'}
1344100
ABdec
0X0
100
111
$config_file and -f $config_file
1365100
ABdec
0X0
100
111
$key =~ /^logger/ and $new_params->{$key} ne "NULL"
1379100
ABdec
0X0
100
111
$obj->{'logger'} and $obj->{'logger'}->can("info")
139450
Adec
00
11
$obj->{'carp_on_warn'} || 0
1533100
ABdec
0X0
100
111
defined $class and defined $obj
1544100
Adec
00
11
$SIG{'USR1'} || 'DEFAULT'
15560
ABdec
0X0
100
111
$_original_usr1_handler ne "DEFAULT" and $_original_usr1_handler ne "IGNORE"