|
|
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
|