kill(POSIX::SIGINT, $pid);