ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : vilfred                              2:5020/400     03 Jan 2002  23:32:55
 To : Artem Chuprina
 Subject : Re: Маска
 -------------------------------------------------------------------------------- 
 

 
 Привет!
 
 А так нельзя?
 
 `du -sh /dir/*.txt`; #for unix-like
 
 или что то типа
 
 #!/usr/bin/perl -w
 use CGI 'param';
 use File::Find;
 
 $regex=param('mask');
 $dir=param('dir');
 
 eval $regex;
 eval $dir;
 
 find \&wanted, $dir;
 sub wanted {print $count++, "\t$File::Find::name all ok!\n" if /
 $regex/i}
 
 запускать вроде так 
 
 ./find.pl file=s?html? dir=/usr/local/etc/httpd/htdocs
 
 может и заработает.
 
 Или я не очень понял, что надо-то?
 
 Дима
 
 -- 
 TEAM [Маньяки]
 Отправлено через сервер Talk.Ru - http://www.talk.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.ru (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Маска   George   03 Jan 2002 08:37:56   Re: Маска   Artem Chuprina   03 Jan 2002 16:33:46   Re: Маска   vilfred   03 Jan 2002 23:32:55   Re: Маска   Artem Chuprina   04 Jan 2002 12:31:00   Маска   George   04 Jan 2002 09:34:16   Re: Маска   Artem Chuprina   08 Jan 2002 13:40:55