605 |
while ( my ( $zeb, $es ) = each %index_field_convert ) { |
605 |
while ( my ( $zeb, $es ) = each %index_field_convert ) { |
606 |
$search =~ s/\b$zeb(?:,[\w-]*)?:/$es:/g; |
606 |
$search =~ s/\b$zeb(?:,[\w\-]*)?:/$es:/g; |
800 |
# ['', '"donald duck"', '', ' ', '', 'title:"the mouse"', '', ' ', 'and', ' ', 'pete'] |
800 |
# ['', '"donald duck"', '', ' ', '', 'title:"the mouse"', '', ' ', 'and', ' ', 'pete'] |
801 |
my @tokens = split /((?:[\w-]+:)?"[^"]+"|\s+)/, $query; |
801 |
my @tokens = split /((?:[\w\-.]+:)?"[^"]+"|\s+)/, $query; |