On Tue, Jun 16, 2009 at 3:01 PM, Hans Dieter Pearcey<hdp.perl.module-auth...@weftsoar.net> wrote: > On Tue, Jun 16, 2009 at 02:49:36PM -0700, Bill Ward wrote: >> Arg, I meant to say $SIG{__WARN__} when I wrote the original >> message... sorry. I was hoping to avoid that, since I think we are >> already messing around with %SIG in our applications too much as it >> is. > > What would doing *anything* with other keys of %SIG have to do with it? Or > did > you mean that you're already using $SIG{__WARN__}, and overriding or wrapping > it again would be painful?
I know we're doing all kinds of crazy stuff to __DIE__ and I'm not sure about __WARN__ but I suspect we may be. > __WARN__ and __DIE__ are not my favorite tools ever, but a situation like this > (where you aren't going to be trying to pick up after the handler's done) > isn't > egregious. > > Also, I don't think you're going to find anything better without requiring > that > all your packages import warnings FATAL => 'all', either directly or through > some intermediary module (see e.g. Modern::Perl for how to do this). I'll look into Modern::Perl, thanks -- Check out my LEGO blog at http://www.brickpile.com/ View my photos at http://flickr.com/photos/billward/ Follow me at http://twitter.com/williamward