Perl脚本寻找具有相对名称的文件

Question

我有一个目录：

/foo/bar/logs_69915

最后一个目录（logs_69915）的编号每5分钟更改一次。

该目录中的文件名为：

statuslog.1234.log

此日志文件中的数字也会更改。

如何为此文件设置变量？

我试过了：

my ($file) = glob '/foo/bar/logs*/statuslog*.log';

没有成功

Answer 1

使用glob()

获取最新文件

my ($file) = sort { -M $a <=> -M $b } glob("foo/bar/logs*/statuslog*.log");

（可以通过缓存-M文件值来改进）