#!/usr/bin/perl -w
use strict;
use Proc::Background;
my $pid1 = Proc::Background->new("cd /tmp ; pwd > testplpwd ; sleep 100");
for (my $i=0; ; ++$i) {
print STDERR "$i: Your pid $pid1 is ".($pid1->alive())."\n";
($pid1->alive()) or last;
sleep(1);
}
/iaw
In reply to Re^2: background system() and stillalive() sub
by iaw4
in thread background system() and stillalive() sub
by iaw4
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |