|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander Bolotnov 2:5052/4.82 30 Aug 2000 10:43:57
To : Alexander Babanov
Subject : file size
--------------------------------------------------------------------------------
29 Aug 00, Alexander Babanov -> Alexander Bolotnov:
> print -s DL;
да, короткий способ, только
print "bahhhh" if ((print -s DL) > 0);
выдает рамер_файлаbahhhhh
что не есть хорошо... :)
> Еще можно fseek в конец/ftell. Или в твоем варианте не все
> присваивать.
пробовал вот так:
open DL, < dev.pl;
$mode = (stat(DL))[7];
print "File zise = %d", $mode;
#или проще - print "File size - $mode";
close DL;
заработало...
[NewNet] Alexander Bolotnov.
---
* Origin: Kozmo Quake papah... lol :-) (2:5052/4.82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
file size 
