in reply to Re: goto in CORE::GLOBAL::exit - is it safe?
in thread goto in CORE::GLOBAL::exit - is it safe?

Yeah, I've already seen this code here. ;-)

I propose exactly same solution, and I just wonder why it was not used by mod_perl? This make me thinking there can be some hidden issues with this solution.

  • Comment on Re^2: goto in CORE::GLOBAL::exit - is it safe?

Replies are listed 'Best First'.
Re^3: goto in CORE::GLOBAL::exit - is it safe?
by SFLEX (Chaplain) on Aug 30, 2007 at 16:22 UTC
    thats the same link i got the code from.

    for mod_perl i use this code to exit. * Edited
    use subs qw(exit); # this is also part of the exit mod_perl code # if anyone cares # Figure out how to exit mod_perl. *exit = $ENV{'MOD_PERL'} ? \&Apache::exit : sub { CORE::exit };

    I was playing with another code like it but that one seemed to work better.
      ... and &Apache::exit internally call die(). And so it fail to "exit" if this code executed inside eval. This is documented issue, you can read about it here.

      I just wonder why not solve this issue by replacing die() with goto()?

        Let me suggest this link

        http://perl.apache.org/docs/1.0/guide/intro.html#Apache__Registry

        Now im starting to scratch my head. =D
        *Edited
        and this link maybe of some intrest also.
        http://perl.apache.org/docs/1.0/guide/porting.html#die___and_mod_perl