Select Code to Download

sub trap_signals {
  local $SIG{CHLD} = \&handler;
  :
}

sub init {
   $SIG{CHLD} = ...;
...
   init()
   ... main code ...
}

sub main {
   ... main code ...
...
   ... init code ...
   main();
}