$SIG{__DIE__} = sub { print "All your base are belong to us!"; }