2017-07-18 3 views
2

ci-dessous est le code, s'il vous plaît me donner des suggestions pour afficher le résultat de la sortie de la commande.affichage de la commande sur la page Web en utilisant 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 
+0

'mes $ d = qx (perl -cw 1.cgi 2>' &1); – mkHun

+0

En savoir plus sur [ '2> & 1'] (https://stackoverflow.com/questions/818255/in- t he-shell-what-does-21-mean) – mkHun

+0

merci beaucoup mkHun. –

Répondre

3

qx retournera la STDOUT dans la variable mais vous essayez de stocker le résultat compiler Perl dans votre variable Dans Linux, il est appelé comme STDERR pas STDOUT donc nous devons faire comme suivre

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

En savoir plus sur 2>&1