ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Ilya Anfimov                         2:5020/400     16 May 2002  13:19:18
 To : Antuan March
 Subject : Re: Объем папки
 -------------------------------------------------------------------------------- 
 

 On Wed, 15 May 2002 22:17:35 +0400, 
 Antuan March <Antuan.March@p1.f5.n5069.z2.fidonet.org> wrote:
 
 >Hello everybody.
 >
 >Чем сабж проверить... (тоесть размер всех файлов входящих в эту папку)
 >Как один файл знаю а вот как всю папку (_HЕ_ затрагивая файло) не знаю :(
 
 perl -e '@dutext = `du -bcs .`; 
          $dutext[-1] =~ m/^(\d+).*$/; # Первые цифры в последней строчке.
          $size = $1;
          print $size; '
 
  Этот  набросок  не  проверяет никакие ошибки (как сделать -- см.
 описание backtics, qx в perlop), но требует, разумеется, прав  на
 чтение всех поддиректорий.
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Объем папки   Antuan March   15 May 2002 23:17:35   Re: Объем папки   Vladimir Podgorny   16 May 2002 10:19:08   Re: Объем папки   Artem Chuprina   16 May 2002 11:46:56   Re: Объем папки   Ilya Anfimov   16 May 2002 13:19:18