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

下面是代码，请给我任何建议以显示命令输出的结果。在网页上使用Perl显示命令输出cgi

#!/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

来源

2017-07-18 sridhar reddy

'我的$ d = QX（perl的-cw 1.cgi 2> &1);' – mkHun

进一步了解['2>＆1']（https://stackoverflow.com/questions/818255/in- Ť他-hell-what-does-21-mean） – mkHun

非常感谢你mkHun。 –

qx将返回STDOUT变量，但是你想Perl的编译结果保存到您的变量，在Linux中被称为STDERR不是STDOUT所以我们需要做如下

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

更多关于2>&1

来源

2017-07-18 13:58:50 mkHun

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

回答

相关问题