linux - 如何将 Linux 上的 perl 脚本的输出转储到文件名为时间戳的日志文件中

Question

我有一个在 linux 机器上运行的 perl 脚本 example.pl。我需要捕获 perl 脚本执行的输出并为其名称添加时间戳。我知道输出重定向方法，但我正在寻找一种从脚本 example.pl 本身(如果可能的话)来实现它的方法

Answer 1

将 STDOUT 重定向到文件很容易。只需在脚本开头执行此操作:

open STDOUT, '>', "my_stdout_file.txt";

这是一个返回带有时间戳的文件名的函数:

sub generate_timestamp_filename {
    my $tstamp = sprintf( "%04d%02d%02d%02d%02d%02d", 
                                $now[5]+1900, 
                                $now[4]+1, 
                                $now[3],
                                $now[2],      
                                $now[1],   
                                $now[0] );

    return "my_prefix_$tstamp.txt";
}