我写这个来找出给定文件的文件创建时间:
#!/usr/bin/perl
use strict;
use warnings;
use File::stat;
open (my $fh, '<', "abc.txt") or die "$!";
my $t = (stat($fh))[9];
print $t;
但是,这不起作用,并给出:
Use of uninitialized value $t in print at ./tests.plx line 9.
谁能指出我在这里做错了什么?或者这不能在 Windows/Cygwin 上的 perl (5.14.2) 上完成,我必须选择一些替代方法?
提前致谢。