$pid = fork();
if( $pid == 0 )
{
    my $p_pid;
$p_pid = getppid;
print "+START Child process: $$.$p_pid " ;
sleep 1;
print "+EXIT Child process: $$.$p_pid ";
exit;
}
else
{
     my $status_pid = 0;
}