in reply to Self resurrecting perl scripts
Two suggestions:
1) You can call exec and re-start your script from within your end block.
By passing it enviromental variables and/or command line parameters you can give it all the information it needs.
2) Override the built in die function. (See camel, p306 in v3).
<code> *CORE::GLOBAL::die = sub {
print STDERR "In my own die function!"; CORE::die(@_);
#Notreached exit(1); }
N.B. This is just untested example code.
When you call die it prints In my own die function then call's the builtin die function.
1) You can call exec and re-start your script from within your end block.
By passing it enviromental variables and/or command line parameters you can give it all the information it needs.
2) Override the built in die function. (See camel, p306 in v3).
<code> *CORE::GLOBAL::die = sub {
print STDERR "In my own die function!"; CORE::die(@_);
#Notreached exit(1); }
N.B. This is just untested example code.
When you call die it prints In my own die function then call's the builtin die function.
In Section
Seekers of Perl Wisdom