#!/usr/bin/perl -w
$process = shift;
kill 'INT', $process;