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) |
48
|
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 |