|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Averbuh 2:4625/23.7 21 May 2000 10:40:00 To : All Subject : дата создания файла -------------------------------------------------------------------------------- ДДВ " ВДї Дї і АДЩ ДБ Hello, All! Как поживает твой hерц? Как $mtime разбить отдельно на год, месяц, день? opendir (DIR, '') || die "dfg"; @files=readdir DIR; closedir(DIR); foreach (@files){ $name=$_; ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, $atime,$mtime,$ctime,$blksize,$blocks) =stat $name; print "$name - $size\n" } С уважением, Alexander Так, идите мыть руки, All! mailto: alexaver@chat.ru http://alhome.virtualave.net --- GoldED 2.50+ * Origin: Haettest du mich geliebt! (2:4625/23.7) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/27933927cb83.html, оценка из 5, голосов 10
|