下面是代码, 请给我任何显示命令输出结果的建议。
#!/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
最佳答案
qx
将在变量中返回 STDOUT
但您试图将 Perl 编译结果存储到您的变量中,在 Linux 中它被称为 STDERR
不是 STDOUT
所以我们需要做如下
my $d=qx(perl -cw 1.cgi 2>&1);
更多关于 2>&1
关于linux - 使用perl cgi在网页上显示命令输出,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/45168458/