Архив форумов ЦИТФорума

[KoMa]

Кто-нибудь определял время последней модификации файла перловой функцией stat? (по аналогии с SSI директивой flastmod) Как по секундам с 1970 года вычислить год, месяц, день? Какие-то готовые календари есть?

[libcrypt]

#!/usr/bin/perl
use POSIX (strftime);
$file = "blya";
$mtime = strftime("%d.%m %H:%M", localtime((stat($file))[9]));
print $mtime."\n";

а вообще все начинается с man POSIX