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

Question

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

我是按照全局变量或环境变量来思考的。

我只为mod_perl>=2而烦恼。

Answer 1

根据"环境变量"；在mod_perl用户指南中：

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

mod_perl/2.000002

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

die"；我拒绝在没有mod_perl的情况下工作"除非存在$ENV｛MOD_PERL｝

（有关更多信息，请参阅上面的链接）。

Answer 2

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

exists $ENV{MOD_PERL}