in reply to Re: different between die and exit
in thread different between die and exit

ITYM "almost always exits (unless someone's done some really evil monkeying around behind your back)" . . . 

use strict;
use warnings;

BEGIN { *CORE::GLOBAL::exit = sub { print "You'll never take me alive,
+ copper!\n"; }; }

eval { die };
print "You can see I'm still alive!\n";
eval { exit };
print "You should never see this print\n";
eval { CORE::exit };
print "Now this you won't get to see\n";

[download]

The cake is a lie.
The cake is a lie.
The cake is a lie.

Replies are listed 'Best First'.
Re^3: different between die and exit
by ikegami (Patriarch) on Feb 23, 2009 at 19:44 UTC

    Well, if you're going to be that picky, exit isn't the only function that can be overriden. 

    use strict;
use warnings;

BEGIN { *CORE::GLOBAL::die = sub {
   print(STDERR @_);
   CORE::exit($! || 255);
}; }

eval { die };
print "You can see I'm still alive!\n";  # Never reached

    [download]

    All bets are off when you start overriding functions, so your nit is pointless.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom