$SIG{__WARN__} = \&log_warn; $SIG{__DIE__} = \&log_die;