|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Babanov 2:5020/1978.3 29 Aug 2000 18:12:06 To : Alexander Bolotnov Subject : Re: file size -------------------------------------------------------------------------------- Юґullo Alexander! AB> спросить хотел... AB> можно размер файла узнать так: AB> open DL, "< var.pl"; AB> ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blk AB> size,$b l ocks) = stat(DL); print "$size - size"; close DL; а как-нить AB> покороче можно? print -s DL; Еще можно fseek в конец/ftell. Или в твоем варианте не все присваивать. ЗЫ: Ларри не советует использовать файловые тесты (типа -s), если есть вероятность работы с файлом из другого процесса. Правду врет ;) CYa!!! ЪДВїЪДВВВДДДщщъъ ЪДВВВДї ЪїЪДВДДДДДДДДщщъъ ЪДДДД 2:5020/1978.3 ДДДДї іВіАґДЕ ґBabanov іВі ґВі іАґВіST BERSERKER і babanov@earthlink.net і ... "I'll be back!" / (c) B-) --- * Origin: Our governor can beat up your governor! (2:5020/1978.3) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/400239ac4404.html, оценка из 5, голосов 10
|