Surat Singh Bhati <[EMAIL PROTECTED]> wrote:

> Any trick to find out that a given CGI is working under
> Apache::PerlRun or Apache::Registry. The $ENV{MOD_PERL} says
> that script is working under mod_perl, but it does not says it
> is working under Perlrun Registry.

Use caller - at the top of your script:

        my @env=caller;
        my $env=@env ? $env[0] : 'CGI';

$env will be one of 'CGI', 'Apache::Registry' or 'Apache::PerlRun'. Use 
$env=(caller)[0] if you always run under mod_perl.

Pete

Reply via email to