eval { do_something(); 1 } or warn $@;