1

特定のファイルのファイル作成時間を調べるためにこれを書きました:

#!/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) では実行できず、別の方法を選択する必要がありますか?

前もって感謝します。

4

1 に答える 1

5

statfromはオブジェクトFile::statを返しFile::statます。削除use File::stat;して配列を取得するか、 を使用しますmy $t = stat($fh); print $t->atime;

于 2013-04-20T12:45:02.390 に答える