|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 15 Feb 2002 23:22:48
To : Misha Bukachuk
Subject : Re: считать последнюю строку
--------------------------------------------------------------------------------
Здравствуй, Misha Bukachuk.
MB> А каким самым удобным способ можно считать из файла последнюю строку ?
Если у тебя юникс или цигвин, то `tail -n 1 $filename`. Если юникса нет, то
для маленького файла
open(F,"< $filename");
$lastline = ((<F>)[-1]);
close F;
для большого придется честно
open(F,"< $filename");
while (<F>) {
$lastline = $_;
}
close(F);
--
Artem Chuprina
Communiware.net
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
P.S. Для желающих наехать про ОЧЕHЬ БОЛЬШИЕ файлы, напоминаю формулировку
вопроса: "самым удобным". А вовсе не "самым быстрым". Как работает tail на
seekable input'е, я в курсе. Hо геморрой с определением, насколько input
seekable и реализацией того алгоритма... Быстрее, чем на C, но все равно
неудобно.
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.Mail.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: считать последнюю строку 
