ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Michael B. Babakov                   2:5020/400     08 Nov 2001  21:52:26
 To : Artem Chuprina
 Subject : Re: N lines from end
 -------------------------------------------------------------------------------- 
 

 Artem Chuprina wrote:
 
 > Здравствуй, PROext.
 > 
 > P> > > > Как лучше всего прочитать N последних строк из файла?
 
 [...]
 
 > 
 > Я фигею, дорогая редакция... Ты Кнута давно не читал? При каждой строке
 > весь массив переписывать - это ж с дуба рухнуть надо...
 > 
 > $arr[$current_index++] = $stroka;
 > $current_index%=$N;
 
  Hу, если вопрос не академический и дело под юниксом, то можно и через 
 open(F, "tail -$N $filename |");
 
 :)
 -- 
 С уважением,
  Михаил Бабаков
 
 - ---
 e-mail: M.Babakov@sochi.net.ru
 http://sochi.net.ru/~mike
 --- ifmail v.2.15dev5
  * Origin: It's my home (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    N lines from end   Konstantin Dolgan   08 Nov 2001 14:36:34   Re: N lines from end   PROext   08 Nov 2001 15:42:08   Re: N lines from end   Konstantin Dolgan   08 Nov 2001 16:51:13   Re: N lines from end   PROext   08 Nov 2001 17:25:02   Re: N lines from end   Artem Chuprina   08 Nov 2001 20:40:53   Re: N lines from end   Michael B. Babakov   08 Nov 2001 21:52:26   Re: N lines from end   PROext   09 Nov 2001 10:45:06