kill -15 => getpgrp($pid);  # process group of child
kill -15 => getpgrp;        # process group of current process (the script)

# or even (as $$ equals the process group in this case):
kill -15 => $$;