STDINがうまく動きません。

質問

次のようなスクリプトを書いて、Windows上でDOSプロンプトから
scr.pl < aho.txt と実行しましたが何も出力されません。
エラーメッセージなども表示されません。
STDINのpipeが動いていないと思われるのですが、何か書き方に
問題があるのでしょうか？ 教えてください。
よろしくお願いします。

#!/usr/bin/perl-w
while (<STDIN>) {
chomp;
print $_;
}

回答No.1

ORUKA1951 · ベストアンサー

コマンドプロンプト>perl scr.pl < aho.txt
だけど？？？

Windowsの場合、
#!/uar/bin/perl　はいらないよ。
よって
______________________________
while (<STDIN>) {
chomp;
print;
}
^^^^^^^^^^^^^^^^^^^^^^^だけでよい。

お礼

さっそくの回答ありがとうございます。
perl scr.pl < aho.txt でうまく動きました！！