Branch Coverage

blib/lib/Piddy.pm
Criterion Covered Total %
branch 5 48 10.4


line true false branch
63 1 0 if ($args)
82 0 1 if (not $ext_pid) { }
91 0 0 if ($self->_pid_exists($filename))
95 0 0 if (!$rpid eq getppid) { }
98 0 0 if ($self->running)
100 0 0 if ($self->running)
114 0 0 unless open my $pid_file, ">$filename"
117 0 0 unless (print $pid_file $$)
143 0 0 if (exists $$self{'info'}{$info}) { }
160 0 0 if ($self->kill('-STOP', $pid)) { }
175 0 0 if ($self->kill('-CONT', $pid)) { }
193 0 0 if ($< != 0)
200 0 0 if ($cmd eq '') { }
244 0 0 if (-d '/proc') { }
245 0 0 if (-d "/proc/$pid") { }
253 0 0 if ($ps =~ /^$pid /) { }
267 0 0 if ($err) { }
274 0 0 if (not $self->_pid_exists($fname)) { }
277 0 0 unless open my $pid, "<$fname"
290 0 0 if (-f $fname) { }
297 0 1 unless open my $proc, "/proc/$$self{'pid'}/status"
307 1 0 if ($state =~ /(.+)\s*\((.+)\)/)
314 0 1 if (not $$self{'extpid'})
315 0 0 if (not unlink($$self{'pid_file'})) { }