$count += tr/\n/\n/ while sysread(FILE, $_, 2 ** 20);

gcc, строка



для Вашего файла должна быть



еще надо проверять, было ли точное совпадение ключа при помощи File::SortedSeek:was_exact(), т.к. функция alphabetic() может вернуть значение для ключа, следующего за искомым, если он отсутствует в файле.

 
gcc, для чего Вы привели код функции BinSearch(), если модуль File::SortedSeek делает то, что Вам нужно?

сказали "написать функцию",  (функцию которую я тут привел,  я взял ее с другого форума, переделать не молучилось, на вопрос которы я задал тут никто не ответил) попробую этот модуль...

как я сделать поиск/бинарный поиск только с помощюь этого модуля

если делать так прмиерно:


то этот модуль ругается на то что "значение" (второй столбик) маленькое 7 символов или криво выводит результат, ну если я так напишу get_between( *BIG, $tell , $tell+7 );, вот это знаничение $tell+7 должно быть точнее... но определить его я не могу


по другому я не понял, или Вы что-то другое имели ввиду?

Это сообщение отредактировал(а) gcc - 28.1.2009, 14:18

gcc, опишите, что, по Вашему, должен делать фрагмент

извените, я перепутал, случайно это написал..

метод get_between() по-моиму смотрит так как seek или нет?

gcc, 


что Вам должна вернуть?

я написал функцию, только удалил ее, она возвращала как раз значение только фиксированной длинной...

использовать этот метод как массив я хотел, попробую пересмотрю еще раз

поиск по 20Мбайт файл работает вот так:


но это не бинарный поиск 

ginnie, я сделаю короче просто через seek, 20Gb конечно делать не буду, процессор сильно грузится, а протестирую на меньшем размере, при 20Мбайт вроде бы работает...

в этом топике информация есть полезная, наверное еще кому-то будет пригодится

всем спасибо... 

Это сообщение отредактировал(а) gcc - 28.1.2009, 17:32

А какой? Бинарный и есть! Если мне не верите, смотрите описание модуля (последний абзац: ...This is the halving the difference or binary search method...).

Это сообщение отредактировал(а) ginnie - 28.1.2009, 23:06