$mid = int( ( $lo + $hi ) / 2 ); if ( $hi == $lo ) { return $mid } #### return $hi if $hi == $lo; $mid = int( ( $lo + $hi ) / 2 ); #### if ( $suff[ $indices[ $index ] ] =~ /^$pattern/ ) { push @positions, $indices[ $index ] + 1; } else { last; } #### last if $suff[ $indices[ $index ] ] !~ /^$pattern/; push @positions, $indices[ $index ] + 1;