$SIG{__DIE__}  = sub { $log->error(@_) && exit(9) };
$SIG{__WARN__} = sub { $log->warn(@_) };