perl -wc

質問

telnet を利用できないユーザーの為に、ブラウザ上でPerl(CGI)の文法チェックができるようにしています。
フォームでファイル名を入力させ、チェックプログラム内で "perl -wc $filename" を実行して結果を出力させるだけだと思い作成したのですが、実行結果を受け取ることができません。
apache のログには実行結果が書かれているのでコマンドは正常に動作しています。

　open(IN, "perl -wc $filename |");
　while (<IN>) {
　 print $_;

と

　$ret=`perl -wc $filename`;

でやってみましたがダメでした。
どなたかご教授願います。
よろしくお願いいたします。

回答No.2

tailkuppa · ベストアンサー

前の発言は質問をよく読んでいませんでした。失礼しました。

手元の環境(unixです)では perl -wc ～の結果は標準エラー出力に出力されるようなので、
$ret = `/usr/local/bin/perl -wc スクリプト 2>&1`;
のように、標準出力にリダイレクトしてみたらどうでしょうか？

お礼

解決しました。
どうもありがとうございました。

回答No.1

tailkuppa

CGI ですよね？
最初に、
print "Content-Type: text/plain \n\n"
は入れていますか？
これがないと、エラーになったと思います。