in reply to How to hide exit and die
Try "CORE::exit". For example:
use strict; use warnings; use Tk; my $etriped = 'e' . 'x' . 'i' . 't'; print "1\n"; eval ("CORE::$etriped"); print "Error: $@\n"; print "2\n"; # Reached if "use Tk;" is present.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: How to hide exit and die
by Anonymous Monk on Jan 14, 2015 at 19:14 UTC |