Select Code to Download

  ## Redirecting to another IO:
...
sub CLOSE {}
sub DESTROY {}

  $SIG{__WARN__} = \&print_stderr ;
  $SIG{__DIE__} = \&handle_die ;