Lines 60-75
sub build_advanced_query {
Link Here
|
60 |
# And others |
60 |
# And others |
61 |
$index_name = @$indexes[$i] if @$indexes[$i]; |
61 |
$index_name = @$indexes[$i] if @$indexes[$i]; |
62 |
my $operator = defined @$operators[$i-1] ? @$operators[$i-1] : 'AND'; |
62 |
my $operator = defined @$operators[$i-1] ? @$operators[$i-1] : 'AND'; |
63 |
for ( uc ( $operator ) ) { |
63 |
if ( uc ( $operator ) eq 'OR' ) { |
64 |
when ('OR'){ |
64 |
$q .= BuildTokenString($index_name, $kw, 'OR'); |
65 |
$q .= BuildTokenString($index_name, $kw, 'OR'); |
65 |
} elsif ( uc ( $operator ) eq 'NOT' ) { |
66 |
} |
66 |
$q .= BuildTokenString($index_name, $kw, 'NOT'); |
67 |
when ('NOT'){ |
67 |
} else { |
68 |
$q .= BuildTokenString($index_name, $kw, 'NOT'); |
68 |
$q .= BuildTokenString($index_name, $kw, 'AND'); |
69 |
} |
|
|
70 |
default { |
71 |
$q .= BuildTokenString($index_name, $kw, 'AND'); |
72 |
} |
73 |
} |
69 |
} |
74 |
$i = $i + 1; |
70 |
$i = $i + 1; |
75 |
} |
71 |
} |
76 |
- |
|
|