- my @marclist_ini = $query->param('marclist');
- for ( my $i = 0 ; $i <= $#marclist ; $i++ ) {
- if ($value[$i]){
- push @field_data, { term => "marclist", val => $marclist_ini[$i] };
- if (!defined $and_or[$i]) {
- $and_or[$i] = q{};
- }
- push @field_data, { term => "and_or", val => $and_or[$i] };
- if (!defined $excluding[$i]) {
- $excluding[$i] = q{};
- }
- push @field_data, { term => "excluding", val => $excluding[$i] };
- push @field_data, { term => "operator", val => $operator[$i] };
- push @field_data, { term => "value", val => $value[$i] };
- }
- }