我的 Perl 程序如何判断是否在 mod_perl 下运行?
我正在考虑全局变量或环境变量。
我只关心 mod_perl >= 2。
$ENV{MOD_PERL}
- 设置为服务器运行的 mod_perl 版本。例如:mod_perl/2.000002如果
$ENV{MOD_PERL}
不存在,很可能您没有在 mod_perl 下运行。die "我拒绝在没有 mod_perl 的情况下工作!" 除非存在 $ENV{MOD_PERL};
(有关更多信息,请参阅上面的链接)。
http://perl.apache.org/docs/2.0/user/coding/coding.html#Environment_Variables说会有一个环境变量MOD_PERL
,所以你可以使用表达式测试它
exists $ENV{MOD_PERL}