【发布时间】:2021-07-28 07:21:07
【问题描述】:
[root@localhost html]# rpm -q centos-release
centos-release-7-9.2009.1.el7.centos.x86_64
[root@localhost html]# httpd -v
Server version: Apache/2.4.6 (CentOS)
Server built: Dec 13 2020 00:35:05
[root@localhost html]# perl -v
This is perl 5, version 34, subversion 0 (v5.34.0) built for x86_64-linux
[root@localhost html]# cpan
cpan shell -- CPAN exploration and modules installation (v2.28)
[root@localhost html]# pwd
/var/www/html
[root@localhost html]# ls -lha
-rw-r--r--. 1 apache apache 239 Jul 26 09:54 .htaccess
-rw-r--r--. 1 apache apache 47 Jul 25 20:00 index.html
-rwxr-xr-x. 1 apache apache 97 Jul 26 11:02 perl.pl
脚本在 http://localhost/perl.pl 上正常运行
PERL 脚本内容
#!/usr/bin/perl
use strict;
use warnings;
print "Content-type: text/html\n\n";
print "Hello World!";
exit;
[root@localhost html]# pp -x -c -o a.out perl.pl
/tmp/kjzLwQRe6G syntax OK
[root@localhost html]# mv a.out xx.pl
[root@localhost html]# chown apache:apache xx.pl
[root@localhost html]# chmod 755 xx.pl
[root@localhost html]# ./perl.pl
Content-type: text/html
Hello World![root@localhost html]# ./xx.pl
Content-type: text/html
Hello World![root@localhost html]#
当我通过浏览器 http://localhost/xx.pl 运行脚本时
内部服务器错误
服务器遇到内部错误或配置错误,无法完成您的请求。
[root@localhost html]# tail -f /var/log/httpd/ssl_error_log
[Mon Jul 26 11:06:18.315481 2021] [cgi:error] [pid 18880] [client 2.57.171.41:12219] End of script output before headers: xx.pl
[Mon Jul 26 11:07:21.702880 2021] [cgi:error] [pid 18881] [client 2.57.171.41:9437] End of script output before headers: xx.pl
[Mon Jul 26 11:07:22.742897 2021] [cgi:error] [pid 18879] [client 2.57.171.41:19913] End of script output before headers: xx.pl
[Mon Jul 26 11:07:28.448565 2021] [cgi:error] [pid 18882] [client 2.57.171.41:27467] End of script output before headers: xx.pl
[Mon Jul 26 11:30:08.557949 2021] [cgi:error] [pid 18883] [client 2.57.171.41:30987] End of script output before headers: xx.pl
【问题讨论】:
-
为什么日志显示
perl.pl和xx.pl?像这样:End of script output before headers: perl.pl然后是这样:End of script output before headers: xx.pl? -
如果您从终端而不是浏览器
http://localhost运行脚本,输出是什么? -
CGI 的文档说基本上你不应该再使用它了,还有更好的选择,并且一些 HTML 生成功能不再被维护。
-
print不结束换行可能会导致自动刷新问题,请尝试添加。虽然程序在退出时应该刷新缓冲区,但可能会有一些轻微的延迟。
标签: perl perl-packager pp-perl-par-packager