|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artur Penttinen 2:5020/400 01 Jul 2000 17:51:43 To : All Subject : Re: Прочесть строку с нужным номером ? -------------------------------------------------------------------------------- On Fri, 30 Jun 2000, Stanislav Novoshinskiy wrote: > From: Stanislav Novoshinskiy > <Stanislav.Novoshinskiy@p11.f63.n5090.z2.fidonet.org> > Newsgroups: fido7.ru.cgi.perl > X-Comment-To: Ilya Rubtsov > Subject: Прочесть строку с нужным номером ? > Date: Fri, 30 Jun 2000 12:51:14 +0400 > Organization: Моя аура обитает где то здесь ==> Viper@Krasu.ru или > > Приветик. Как поживаете, Ilya ? > > Гляжу я, что в Понедельник Июнь 26 2000 19:39, Ilya Rubtsov писал All: > IR> use strict; # без этого никуда > И без нее всё Ок. > IR> my $need = 123; # номер искомой строки, считаем с единицы > IR> my $count = 0; # так, технические подробности > IR> open(F, "/full/path/file.txt") or die "Can't open F: $!"; # открываем > IR> или умираем -- какая без файла жизнь? Да никакой! > IR> while(<F>){ > IR> if(++$count == $need){ # если нашли... > IR> print "The line number $need if '$_' !!!"; # HАШЛИ!!! > IR> last; # хватит искать... > IR> } > IR> } > IR> close(F); # HЕ МУСОРИТЬ! > Гениально - вопрос был такой :" как не трогая весь файл выдернуть (считать) из > него строку с нужным мне номером ?", расскажи мне теперь что ты делаешь в > своем цикле while(<>), если это не перебор всего файла до нужной строки. Остальные решения принесут больший геморрой. Можно проиндексировать весь файл и использовать прямой доступ к нему, можно использовать базу данных. Вам _это_ надо? > IR> А какое это имеет отношение к CGI??? > Это больше имеет отношение к программированю под web, к чему CGI относится > непосредственно. > Если бы это было локальная машина - хоть 10 раз я его прогоню через память, а > это сервер и за его перегрузку меня админ будет долго с пряником искать... Меняйте алгоритм. WBW, Artur -- Чистоплотность - это чистоМАССА на чистоОБЪЕМ! (Hовый русский физик) --- ifmail v.2.15dev5 * Origin: Gamma NNTP server Moscow Russia (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/117261a0515bc.html, оценка из 5, голосов 10
|