Exceptions from ‘autodie’ 

my $error = $@;

say "Dying sub:   ", $error->function;
say "Caller was:  ", $error->caller;
say "Line was:    ", $error->line;
say "File was:    ", $error->file;
say "Package was: ", $error->package;
say "Args were    @{ $error->args }";