在perl / cgi文件中运行系统命令时缺少输出

Question

我需要编写一个CGI程序，它将显示系统命令的输出：

script.sh

echo "++++++"  
VAR=$(expect -c " spawn ssh -o StrictHostKeyChecking=no $USER@$HOST $CMD match_max 
100000 expect \"*?assword:*\" send -- \"$PASS\r\" send -- \"\r\" expect eof ") 
echo $VAR 
echo "++++++"

在CGI文件中：

my $command= "ksh ../cgi-bin/script.sh";
my @output= `$command`; 
print @output;

最后，当我在unix中运行CGI文件时， $VAR是一个很长的字符串，包括\\ n和一些定界符。 但是，当我在Web服务器上运行时，输出为

++++++

++++++

因此，在通过Web界面/浏览器时缺少$VAR 。 我知道也许问题是$VAR是很长的字符串。

但是无论如何，除了将输出写入文件然后从浏览器中检索出来之外，还有什么方法可以解决此问题？

谢谢，如果您对我的问题感兴趣。

Answer 1

script.sh使用几个环境变量： $USER ， $HOST ， $CMD和$PASS 。 与登录外壳程序相比，CGI环境将设置不同的环境变量。 在调用script.sh之前，您可能需要从CGI脚本设置这些变量。

Answer 2

尝试找到您正在调用的命令（例如Expect和ssh）在系统上的位置，并将其目录路径添加到脚本使用的PATH中。 即

which expect

返回/ usr / bin / expect，然后添加以下行：

PATH=$PATH:/usr/bin && export PATH

在ksh脚本的开头附近。 在调试期间，您可能还想通过将2> /tmp/errors.txt附加到命令末尾来将stderr重定向到文件，因为浏览器中未显示stderr。

my $command= "ksh ../cgi-bin/script.sh 2>/tmp/errors.txt";