>> use Time::HiRes qw( stat ); Эх, не помогло.
# perl -E'@s = stat "1.xml"; say $s[9]; '
1228673685
# perl -E'use Time::HiRes qw(stat); @s = stat "1.xml"; say $s[9]; '
1228673685
--
Andrew Shitov
______________________________________________________________________
[email protected] | http://shitov.ru
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
