Lines Matching refs:pid

36 	foreach my $pid (@pids) {
37 		if (kill(TERM => $pid) != 1 and $!{EPERM}) {
38 			push @perms, $pid;
88 	defined(my $pid = fork())
90 	if ($pid) {
91 		$CHILDREN{$pid} = 1;
92 		$self->{pid} = $pid;
157 	my $pid = $self->{pid}
159 	my $kid = waitpid($pid, $flags);
166 		delete $CHILDREN{$pid} if WIFEXITED($?) || WIFSIGNALED($?);
225 	kill_children($self->{pid});
232 	my $pid = shift // $self->{pid};
234 	if (kill($sig => $pid) != 1) {
237 		    or die ref($self), " kill $pid failed: $!";
238 		my @cmd = ($sudo, '/bin/kill', "-$sig", $pid);
240 		    and die ref($self), " sudo kill $pid failed: $?";