kill 'INT', keys %process;
delete $process{wait()} while %process;