|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry Karvalio 2:5030/542.45 30 Aug 2000 11:37:58
To : Alexander Bolotnov
Subject : file size
--------------------------------------------------------------------------------
Примерно Tuesday August 29 2000, Alexander Bolotnov вроде как писал к All:
AB> спросить хотел...
AB> можно размер файла узнать так:
AB> open DL, "< var.pl";
AB> ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$bl
AB> ksize,$bl ocks) = stat(DL); print "$size - size"; close DL; а как-нить
AB> покороче можно?
Можно напpимеp так.
open(DL,"var.pl");
($filesize) = (stat(DL))[7];
print "$size - size";
close(DL); можно не делать, пеpл автоматически закpоет.
2ОЛЛ: А скажите, зачем пpи откpытии файла на чтение надо yголок ставить?
"_<_$filename"
now playing: GARBAGE - Milk
--- ЛЭТИ.ФКТИ.САПР.8312
* Origin: E-mail: karvalio@mail.ru Pager: 327-1001 ab. 280137 (2:5030/542.45)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
