in reply to using Carp & CGI::Carp?

Which version of Carp are you using? I've just looked in 5.5.3, 5.6.0, and 5.8.0 and all three use Exporter, so they'll inherit import(). It was slightly broken in 5.6.0 (with lots of error messages from Carp::Heavy), so you might be running afoul of something else.

Personally, I'd use require and import inside of a BEGIN, just as you describe. Can you post some test code?

Replies are listed 'Best First'.
Re: Re: using Carp & CGI::Carp?
by aturner (Initiate) on Mar 24, 2003 at 19:36 UTC
    I don't have the old code handy anymore and of course when I try it now it works. Anyways, for the curious, this is what I'm using now: 
    # test to see if we're running under Apache/mod_perl and load
# the appropriate Carp module
BEGIN {
  if ($ENV{MOD_PERL}) {
    require CGI::Carp;
    import CGI::Carp qw(carp confess cluck croak fatalsToBrowser);
  } else {
    require Carp;
    import Carp qw(carp confess cluck croak);
  }
}

    [download]

    -Aaron

[reply]
[d/l]

      The indirect object syntax in the import call trips my paranoid-o-meter. If this is appropriately near the beginning of the program, you're probably okay, but it's fraught with enough peril (or, I can never remember all of the rules when it is and isn't okay) that I'd rather write: 

      BEGIN
{
    my @symbols = qw( carp confess cluck croak fatalsToBrowser );
    if ($ENV{MOD_PERL})
    {
        require CGI::Carp;
        CGI::Carp->import( @symbols, 'fatalsToBrowser' );
    }
    else
    {
        require Carp;
        Carp->import( @symbols );
    }
}

      [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom