Branch Coverage

blib/lib/Sman/Config.pm
Criterion Covered Total %
branch 1 58 1.7


line true false branch
22 0 1 if (defined $configfile)
34 0 0 if uc $$_[0] eq uc $directive and defined $$_[1]
46 0 0 if (uc $$self{'conf'}[$i][0] eq uc $directive)
47 0 0 if defined $$self{'verbose'}
64 0 0 if (-e "$_/sman-defaults.conf")
65 0 0 if ($self->_isverysafe("$_/sman-defaults.conf")) { }
83 0 0 if (-e $f and $self->_isverysafe($f))
88 0 0 if $defaultconfig
100 0 0 if $verbose
106 0 0 if (scalar @configfiles) { }
118 0 0 if (not open(FILE, "< $file")) { }
123 0 0 if (defined $prevline)
127 0 0 if ($line =~ s/\\$//) { }
130 0 0 if $line =~ /^\s*$/
131 0 0 if $line =~ /^\s*#/
134 0 0 if (defined $directive and $directive and defined $value)
139 0 0 unless close FILE
154 0 0 if (defined $$_[0] and defined $$_[1])
178 0 0 if $verbose
186 0 0 if (defined $ENV{'HOME'})
195 0 0 unless $info
199 0 0 if ($info->uid != 0 and $info->uid != $<)
205 0 0 if ($info->mode & 18)
206 0 0 unless -d _
208 0 0 unless $info->mode & 512
216 0 0 if sysconf(6)
217 0 0 unless $path =~ m[^/]
219 0 0 unless $self->_issafe($path)
221 0 0 if length $path > 1