use Proc::Background;
my $proc = new Proc::Background 'your_script_name';
$proc->alive; ## returns true while the process is still alive
$proc->die;
$proc->wait;