I created child process using fork and I want the child to halt execution and the parent to continue. Is there any handler avaiable in perl 5.6 like SIGSTOP? I have searched everywhere and not been able to find the information.

Below is the code that I tried but ctrl C will stop execution for both the processes

#!/usr/bin/perl

use strict;
use warnings;

$|=1;
my $pid = fork;

die "Cannot fork: $!" unless defined $pid;

unless($pid) {
    print "Child start\n";
    my $end;
    local $SIG{INT} = sub { $end = 1 };
    while(1){
        sleep(1);
        until($end)
        {
            print ".";
            sleep(1);
        }
    }
    exit 0;
}
print "Parent start\n";
for(my $i = 0; ;$i++){
    sleep 1;
    print "*";
    if($i == 10){
        kill INT => $pid;
    }    
}
[download]

Please don't mind if I am wrong in any way, I am quite new to system level programming :-(