Branch Coverage

lib/Proc/DaemonLite.pm
Criterion Covered Total %
branch 1 54 1.8


line true false branch
34 2 0 -d '/var/run' && -w _ ? :
64 0 0 if defined $user and defined $group
70 0 0 unless defined(my $child = fork)
71 0 0 if $child
87 0 0 unless my $uid = getpwnam $user
88 0 0 unless my $gid = getgrnam $group
101 0 0 unless defined(my $child = fork)
103 0 0 if ($child) { }
117 0 0 if ($home)
119 0 0 unless chdir $home
120 0 0 unless chroot $home
128 0 0 if ref $Proc::DaemonLite::CHILDREN{$child} eq 'CODE'
145 0 0 if $CWD =~ m[([./a-zA-z0-9_-]+)]
146 0 0 unless $Proc::DaemonLite::SCRIPT =~ m[([./a-zA-z0-9_-]+)]
151 0 0 if ${^TAINT} eq 1
152 0 0 if ${^TAINT} eq -1
153 0 0 if $^W
155 0 0 unless exec @perl, $program, @ARGV
174 0 0 unless $^S
182 0 0 unless $msg =~ /\n$/
196 0 0 if (-e $file)
199 0 0 unless $pid =~ /^(\d+)$/
200 0 0 if kill 0, $1
202 0 0 unless -w $file and unlink $file
205 0 0 unless return 'IO::File'->new($file, 193, 420)
215 0 0 unless $Proc::DaemonLite::DEBUG
221 0 0 unless $Proc::DaemonLite::DEBUG