perl的int（-M $文件）有什么作用？

Question

我正在查看一些旧的perl代码，我可以看到有人正在使用以下内容比较目录中各种文件的时间戳：

int(-M $filename);

这究竟是做什么的？我查看了文档中的int()条目，但找不到有关-M标记的任何内容。

Answer 1

这是一个文件测试操作符-X

  

  
• -X FILEHANDLE
  
• -X EXPR
  
• -X DIRHANDLE
  

• -X

       

  文件测试，其中X是下面列出的字母之一。这个一元运算符接受一个参数，可以是文件名，文件句柄或dirhandle，并测试相关文件以查看是否有关于它的内容。如果省略参数，则测试$_，-t除外，测试STDIN。除非另有说明，否则返回1表示true，''表示false。如果文件不存在或无法检查，则返回undef并设置$!（错误）。尽管有趣的名称，优先级与任何其他命名的一元运算符相同。运营商可以是以下任何一个：

  ...
  31.  -M  Script start time minus file modification time, in days.