|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Nickolay Umnoff 2:5099/17 31 Aug 2000 10:05:58
To : Alexander Bolotnov
Subject : file size
--------------------------------------------------------------------------------
Отвечая на письмо Alexander Bolotnov (2:5052/4.82) к All:
AB> спросить хотел...
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> покороче можно?
$file="/path/file";
$size=-s $file;
Или
@stat=stat($file);
print "$file size is @stat[7] bytes\n";
/Nickolay [Registered Linux User 161656]
mailto: fat@linuxfan.com
... Can you teach an old SysOp new tricks?
--- GoldED+/LNX 1.1.4.3
* Origin: FATSoft II, MR, Russia (2:5099/17)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
