Select Code to Download

use overload q!""!=>sub{ eval { "whoops" } };
eval { die bless {} };
die $@ if $@;

use overload q!""!=>sub{ eval { "whoops" } };
eval { die bless {} };
my $exception = $@;
die $exception if $exception;