代码之家 › 专栏 › 技术社区 › sridhar reddy

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

cgi perl linux

sridhar reddy · 技术社区 · 8 年前

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

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

1 回复 | 直到 8 年前

mkHun 8 年前

qx 将返回 STDOUT 在变量中,但您试图将Perl编译结果存储到变量中,在Linux中,它被称为 STDERR 不是一个所以我们需要做以下工作

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

2>&1

推荐文章

MaPo · Linux,设置锁定ICMP_过滤器选项

5 月前

user2138149 · 双栈网络服务器无法按预期处理ipv4请求

5 月前

Marco · PyCharm Linux系统文件上os.stat异常

6 月前

Folkert Meeuw · lsusb|awk'{print$6}'|xargs-null lsusb-s有什么问题

6 月前

MWB · madvise(地址、大小、MADV_DONTNEDE)会导致分段故障吗?

6 月前

Roger Costello · 如何迭代所有文件夹及其子文件夹,并让AWK处理子文件夹中的每个TXT文件?

6 月前

Hubert Gonera · 如何在Linux Mint上使用Libparted写出所有连接的设备?

6 月前

Claudio Daffra · 如何修复C中“realloc后可能会使用旧指针[-Use after free]”的警告?

6 月前

Elektito · 变量地址不在/proc/self/maps中的堆栈范围内

6 月前

Andrey Yankovich · Qt 6.8 linux(gcc)Web引擎缺失

7 月前