perl如何从数组概念以外的目录逐个读取文件？

Question

如何从数组概念以外的目录中逐个读取日志文件。我试过这个概念，但我没有达到要求。因为在当前工作目录中，日志文件不断添加到它。如果我使用数组概念，则缺少最新的日志文件。有没有更好的解决方案呢？下面是我试过的代码，这里的数组内容是目录的所有文件。

opendir ( DIR, $readDir ) || die "Error in opening dir $readDir\n";
my @files = grep { !/^\.\.?$/ } readdir DIR;
print STDERR "files: @files \n\n";

Answer 1

如果您使用的是Linux，

my $log_content = `cat /log/dir/*.log`;

这会将所有日志文件内容合并为一个。