我的Perl程序如何判断是否在mod_perl下运行？

Question

我的Perl程序如何判断是否在mod_perl下运行？

我正在思考全局变量或环境变量。

我只对mod_perl＆gt; = 2感到困扰。

Answer 1

根据"Environment Variables" in the mod_perl user's guide：

  

$ENV{MOD_PERL} - 设置为运行服务器的mod_perl版本。 e.g：

  mod_perl/2.000002

     

如果$ENV{MOD_PERL}不存在，很可能您没有在mod_perl下运行。

  die "I refuse to work without mod_perl!" unless exists $ENV{MOD_PERL};

（有关详细信息，请参阅上述链接）。

Answer 2

http://perl.apache.org/docs/2.0/user/coding/coding.html#Environment_Variables表示会有一个环境变量MOD_PERL，因此您可以使用表达式

测试

exists $ENV{MOD_PERL}