http://www.perlmonks.org?node_id=964909


in reply to Run in eval and out of eval

caller() looks different in eval().