ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Maxim Y. Zinyakov                    2:5065/21      23 May 2000  14:28:08
 To : Alexander Averbuh
 Subject : дата создания файла
 -------------------------------------------------------------------------------- 
 

 
 21 May 00 10:40, you wrote to All:
 
  AA> opendir (DIR, '') || die "dfg";
  AA> @files=readdir DIR;
  AA> closedir(DIR);
 
  AA> foreach (@files){
  AA> $name=$_;
  AA>  ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
  AA>   $atime,$mtime,$ctime,$blksize,$blocks)
  AA>                    =stat $name;
  AA>  print "$name - $size\n"
  AA> }
 
 $datestr = scalar localtime($mtime);
 все.
 Удачи!
         *Maqs.*
 --- GoldED/LNX 3.0.1
  * Origin: WARNING! System paused: waiting for the miracle... (2:5065/21)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    дата создания файла   Alexander Averbuh   21 May 2000 10:40:00   дата создания файла   Maxim Y. Zinyakov   23 May 2000 14:28:08