Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
use strict;
use warnings;
$SIG{__DIE__} = sub {
print "die handler: @_";
$SIG{__WARN__} = sub {
print "warn handler: @_";
eval {
die "error message";
warn $@;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.