|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Roman Yu. Panichkin 2:5020/400 13 Nov 2000 11:15:50 To : Anatolij Kupriyanov Subject : Re: Файлы -------------------------------------------------------------------------------- Hello Anatolij ! >>>>> At Sun, 05 Nov 2000 22:44:31 +0300 >>>>> "AK" == Anatolij Kupriyanov writes : RP> Буквально вчера решал такую задачу. Только файл содержал >5*10^6 сторк. RP> Так что совет будет немножко не в тему. Hо может кому понадобится. RP> Использовал для этого BerkeleyDB и его тип файла Recno. RP> Вот код который выводит первую и миллионную запись. AK> [В своп засосало] RP> Первый запуск долгий - пока создается файл data.db. Зато потом RP> быстро RP> записи вытаскивает. Размер файла data.db чуть больше исходного. После RP> создания data.db файл data.txt можно удалить - вся информация содержится RP> в data.db. AK> А нафиг база данных??? AK> Hе проще ли: AK> open FILE, $filename; AK> @File=<FILE>; AK> print $File[1], $File[1_000_000]; AK> Или я юмора не понял? 5*10^6 записей, средний размер записи ~120 байт, порядок выборки произвольный. Дальше объяснять? Впрочем я предупреждал что этот совет несколько не в тему. 1000 строк можно и в память загрузить. -- Best regards, -- Roman. Your picture of the world often changes just before you get it into focus. --- ifmail v.2.15dev5 * Origin: Alvis Plus Trade Company (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/1359250a16585.html, оценка из 5, голосов 10
|