END blocks in perl

clueless newbie has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: END blocks in perl by Sidhekin (Priest) on Oct 16, 2007 at 14:32 UTC
what will prevent the END block from executing? exec, for starters: `perl -le 'END { print "Can you hear me?" } exec $^X, -le => exit => 0'` [download] Also, internal errors (segfaults, core dumps, whatever): `perl -le 'END { print "Can you hear me?" } dump'` [download] So don't rely on it too much. `print "Just another Perl ${\(trickster and hacker)},"` The Sidhekin proves Sidhe did it!	[reply] [d/l] [select]
Re: END blocks in perl by toolic (Bishop) on Oct 16, 2007 at 14:48 UTC
I happened to stumble upon this http://www.perl.com/cookbook/perlckbk2/solution.csp?day=1 (Perl Cookbook, section: 16.22. Turning Signals into Fatal Errors) It discusses the sigtrap pragma.	[reply]
Re^2: END blocks in perl by clueless newbie (Curate) on Oct 16, 2007 at 15:18 UTC
Can this be used to catch the seg faults and some of the whatevers that Sid has mentioned?	[reply]
Re^3: END blocks in perl by shmem (Chancellor) on Oct 16, 2007 at 18:19 UTC
You don't want a program that segfaults to continue. It tries to mess up the memory of your computer, and you should be glad it is not allowed to do so. A program which crosses its borders in that way should be examined and debugged immediately; it's not that kind of errors you can lightly sweep under the rug. --shmem _($_=" "x(1<<5)."?\n".q·/)Oo. G°\ / /\_¯/(q / ---------------------------- \__(m.====·.(_("always off the crowd"))."· ");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}	[reply]
Re: END blocks in perl by adrianh (Chancellor) on Oct 18, 2007 at 12:59 UTC
In addition to those methods already mentioned, POSIX::_exit() will not run END blocks.	[reply]