use strict;
use warnings;
use Log::Handler;

my $log = Log::Handler->new(
  filename   => \*STDERR,
  newline    => 1,
  debug_mode => 2,
  debug_skip => 2,
);

$SIG{__DIE__} = sub { $log->trace(@_); exit(9); };

die "here we die";