如何同时将程序的输出定向到控制台和日志文件？

Question

如何同时将输出打印到终端和文件？

$ perl foo.pl > foout.txt

不允许我看到实时进程。

有什么方法可以实时查看输出过程并最终在文件上获取屏幕输出？

Answer 1

perl foo.pl | tee fooout.txt

Answer 2

实用程序 tee 将执行此操作。

Answer 3

请参阅 IO::Tee。 该模块将允许您在程序中通过细粒度控制有选择地执行此操作（还有一个不太成熟的模块，称为 File::Tee 曾经对我有用过，但我不会推荐它用于任何严肃的项目）。

另请参阅 Log4perl，了解对记录内容、记录位置和记录方式的真正细粒度控制。

对于从命令行的一次性使用，正如其他人所建议的，您当然可以使用命令行实用程序 tee（如果您有权访问它）。

Answer 4

或者您可以将其通过管道传输到 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 读取一行输入并将其打印到屏幕，然后打印到文件。 当到达末尾时，它将关闭文件