in reply to kill command in perl?

If I understand what you're asking, it's as simple as:
$SIG{INT} = $SIG{TERM} = sub { kill 15 => @process_i_want_to_term; exit; };
or perhaps even
END { kill 15 => @process_i_want_to_term; }
------------ :Wq Not an editor command: Wq