| line |
true |
false |
branch |
|
281
|
0 |
0 |
if $self->debugmode |
|
284
|
0 |
0 |
if ($self->option('datadir')) { } |
|
293
|
0 |
0 |
unless -e $dbdir |
|
1576
|
0 |
0 |
unless is_hash($dbi_conf) |
|
1579
|
0 |
0 |
if ($config->status) |
|
1580
|
0 |
0 |
if $dbi->error |
|
1585
|
0 |
0 |
if ($dbi->is_sqlite) { } |
|
1590
|
0 |
0 |
if ($dbi->error) { } |
|
1613
|
0 |
0 |
if ($skel->build('config')) { } |
|
1616
|
0 |
0 |
unless ($config->status) |
|
1634
|
0 |
0 |
if (ref $hosts eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $hosts eq 'HASH' and not exists $hosts->{'enable'}) { } |
|
1636
|
0 |
0 |
if (ref $r eq 'HASH' and exists $r->{'enable'}) { } |
|
|
0 |
0 |
elsif (ref $r eq 'HASH') { } |
|
1664
|
0 |
0 |
7 * $buweek > $buday ? : |
|
1665
|
0 |
0 |
if 30 * $bumonth > $period |
|
1671
|
0 |
0 |
if ($i < $buday or $i < $buweek * 7 and $wd == 0 or $i < $bumonth * 30 and $d == 1) { } |
|
1680
|
0 |
0 |
if ($i < $buday or $wd == 0 and $wcnt++ < $buweek or $d == 1 and $mcnt++ < $bumonth) |
|
1684
|
0 |
0 |
unless $dates{$date} |
|
1693
|
0 |
0 |
unless value($arcdef, 'ext') |
|
1696
|
0 |
0 |
unless value($arc, 'ext') |
|
1704
|
0 |
0 |
if is_void($collector) |
|
1714
|
0 |
0 |
if exists $sm->{$k} |
|
1744
|
0 |
0 |
$count ? : |
|
1749
|
0 |
0 |
if $self->verbosemode and defined $outdata and length $outdata |
|
1750
|
0 |
0 |
if $exe_stt |
|
1756
|
0 |
0 |
if ($arc_proc and ref $arc_proc eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($arc_proc) { } |
|
1759
|
0 |
0 |
unless $proc |
|
1770
|
0 |
0 |
if $self->verbosemode and defined $outdata and length $outdata |
|
1771
|
0 |
0 |
if $exe_stt |
|
1795
|
0 |
0 |
if $self->verbosemode and defined $outdata and length $outdata |
|
1796
|
0 |
0 |
if $exe_stt |
|
1798
|
0 |
0 |
$exe_stt ? : |
|
1826
|
0 |
0 |
if $maxlen < length $r->[0] |
|
1853
|
0 |
0 |
if (@errs) { } |
|
1882
|
0 |
0 |
unless @ks |
|
1883
|
0 |
0 |
if exists $ks[1] |
|
1884
|
0 |
0 |
$ks[0] && ref $$struct{$ks[0]} eq 'HASH' ? : |
|
1891
|
0 |
0 |
if (ref $j eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $j eq 'HASH' and not exists $j->{$kk}) { } |
|
1894
|
0 |
0 |
if (ref $r eq 'HASH' and exists $r->{$kk}) { } |
|
|
0 |
0 |
elsif (ref $r eq 'HASH') { } |
|
1907
|
0 |
0 |
if defined $j |
|
1913
|
0 |
0 |
if ($n >= 1073741824) { } |
|
|
0 |
0 |
elsif ($n >= 1048576) { } |
|
|
0 |
0 |
elsif ($n >= 1024) { } |
|
1927
|
0 |
0 |
if $self->{'objdir'} and -e $self->{'objdir'} |
|
1928
|
0 |
0 |
if $self->{'excdir'} and -e $self->{'excdir'} |