在PerlRun下运行Perl CGI脚本的错误

Question

我想使用PerlRun在mod_perl 2.0下运行Perl CGI web应用程序。在对脚本进行一些简单的改变之后，一切似乎都奏效了。

但是，Apache error_log越来越大！快速。

有每个请求许多，许多错误，但它们有两种类型：

1）

Constant subroutine ModPerl::ROOT::ModPerl::PerlRun::var_www_html_myapp_main_2epl::RC_SERVICE_UNAVAILABLE redefined at /usr/lib/perl5/vendor_perl/5.8.8/i386-linux-thread-multi/ModPerl/Util.pm line 69. 

2）

Prototype mismatch: sub ModPerl::ROOT::ModPerl::PerlRun::var_www_html_myapp_main_2epl::RC_SWITCHING_PROTOCOLS: none vs() at /var/www/html/myapp/main.pl line 1054 

这是main.pl的线1054：

use LWP::Simple qw(!head); 

How我可以摆脱这两种类型的错误吗？

Answer 1

您的错误消息都与LWP :: Simple有关。 LWP :: Simple导出HTTP常量，这会导致重新定义的警告。当你使用LWP :: Simple时，尽量只包含你需要使用的函数LWP :: Simple qw（get，getstore）;您仍然可以在这些功能上看到原型不匹配错误。