Question

下面是代码，请给我任何建议来显示命令输出的结果。

#!/usr/bin/perl
use strict; 
use warnings;
print "content-type:text/html\r\n\r\n";
print <<EOF;
<html>
<head><title>command</title></head>
<body>
EOF
my $d=qx(perl -cw 1.cgi);
print <<EOF;
<p>$d</p>
</body>
</html>
EOF

Answer 1

qx将在变量中返回STDOUT，但您尝试将Perl编译结果存储到您的变量中，在Linux中，它被称为STDERR而不是STDOUT所以我们需要按照以下步骤进行操作

my $d=qx(perl -cw 1.cgi 2>&1);

有关2>&1

的更多信息

使用perl cgi在网页上显示命令输出

1 个答案: