use strict;
use warnings;
use POSIX;

if (my $pid = fork()) {
  sleep 3;
  kill TERM => $pid;
  waitpid( $pid, 0 );
} elsif ($pid == 0) {
  sleep 10;
} else {
  die "can't fork";
}