出力を端末とファイルに同時に出力するにはどうすればよいですか?
$ perl foo.pl > foout.txt
ライブプロセスを見ることができません。
出力プロセスをリアルタイムで確認し、最後に画面の出力をファイルに取得する方法はありますか?
perl foo.pl |
tee
foout.txt
ユーティリティティーがそれを行います。
または、それを perl プログラムにパイプして、画面とログ ファイルに出力することもできます (つまり、Unix を使用していないか、tee プログラムを使用している場合)。
perl foo.pl | perl myPipe.pl myFile.txt
データが myFile.txt にキャプチャされ、
myPipe.pl は
#
open OUTFILE,">$ARGV[0]" or die "Unable to open file: $ARGV[0]\n";
while(<>)
{
print;
print OUTFILE;
}
close OUTFILE;
これは、STDIN から入力行を読み取り、それを画面に出力してからファイルに出力します。最後に到達すると、ファイルを閉じます