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