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'})) { } |