如何使用Perl获取文件创建时间与当前时间的小时数差异

Question

如何获取文件创建时间与当前时间（以小时为单位）之间的时差

Answer 1

stat($file)->mtime gives you the last modification time in seconds. Subtract that from time and divide it by 3600 ... that should do the trick.

Answer 2

For calculations involving time or dates you can always rely on DateTime !

For your specific cuestion, you can use the constructor from_epoch to convert from Unix timestamp to DateTime.