system('perl','-e',"kill SIGWHATEVER => $pid")