perl - 是否可以在 Perl 中使用单个文件句柄读取多个文件？

Question

我有一些这样的日志文件:

• /var/log/pureftpd.log
• /var/log/pureftpd.log-20100328
• /var/log/pureftpd.log-20100322

是否可以将它们全部加载到一个文件句柄中，还是我需要分别加载它们中的每一个？

Answer 1

一个丑陋的 hack 是这样的:

local @ARGV = qw(
    /var/log/pureftpd.log 
    /var/log/pureftpd.log-20100328 
    /var/log/pureftpd.log-20100322
);

while(<>) {
    # do something with $_;
}