Select Code to Download

eval{ die() }; print $@;;
Died at (eval 13) line 1, <STDIN> line 5.
...

eval{ 4/0 }; print $@;;
Illegal division by zero at (eval 15) line 1, <STDIN> line 7.