Re^3: Program unexpectedly terminates

[ColonelPanic]

in reply to Re^2: Program unexpectedly terminates
in thread Program unexpectedly terminates

Thanks for the additional information. I didn't understand that you were trying to trap explicit calls to exit(). That makes sense, then.

Playing around more with the BEGIN block, I found that an exit() statement within another package was only overridden if the BEGIN block came before the package definition. Do you have this block before you include all of your modules?

Also, would Test::Trap be helpful?

[Anonymous Monk]

Yes, the code in the main package is exactly what I'm using- only the Crawler package is abreviated. Test::Trap is basically an eval and only traps &CORE::GLOBAL::exit, so I don't think it does anything else than what I've tried.

[ColonelPanic]

Well, your code should be catching any normal exit case. You still won't be catching exit() within an eval block, but your END statement should happen nonetheless.

I don't see any way forward other than basic debugging in order to narrow down where, exactly, this problem occurs.

[tobyink]

There's another case not covered: exec. Something like exec("/bin/true") will effectively exit a script without triggering any END blocks, etc.

Illustration:

#!/usr/bin/env perl
use 5.010;
use strict;
use warnings;

BEGIN { *CORE::GLOBAL::exit = sub { die("exit called") } }
END { say "END block"; }

do { exec "/bin/true" }; # Assuming a Unix-like system here
say "got here";