Search::Binary -- generic binary search
use Seach::Binary; $pos = binary_search($min, $max, $val, $read, $handle, [$size]);
binary_search implements a generic binary search algorithm returning the position of the first record whose index value is greater than or equal to
$val. The search routine does not define any of the terms position, record or index value, but leaves their interpretation and implementation to the user supplied function
&$read(). The only restriction is that positions must be integer scalars.
During the search the read function will be called with three arguments: the input parameters
$val, and a position. If the position is not
undef, the read function should read the first whole record starting at or after the position; otherwise, the read function should read the record immediately following the last record it read. The search algorithm will guarantee that the first call to the read function will not be with a position of
undef. The read function needs to return a two element array consisting of the result of comparing
$val with the index value of the read record and the position of the read record. The comparison value must be positive if
$val is strictly greater than the index value of the read record,
0 if equal, and negative if strictly less. Furthermore, the returned position value must be greater than or equal to the position the read function was called with.
The input parameters
$max are positions and represents the extent of the search. Only records which begin at positions within this range (inclusive) will be searched. Moreover,
$min must be the starting position of a record. If present
$size is a difference between positions and determines when the algorithms switches to a sequential search.
$val is an index value. The value of
$handle is of no consequence to the binary search algorithm; it is merely passed as a convenience to the read function.
Copyright 1998, Erik Rantapaa
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.