Lines 144-153
if ( defined $format ) {
Link Here
|
144 |
} |
144 |
} |
145 |
} |
145 |
} |
146 |
|
146 |
|
147 |
my @c = $cgi->multi_param('c'); |
147 |
my %param_names = map { $_ => 1 } $cgi->multi_param; |
148 |
my @fields = $cgi->multi_param('f'); |
148 |
my @c = $param_names{'c[]'} ? $cgi->multi_param('c[]') : $cgi->multi_param('c'); |
149 |
my @q = $cgi->multi_param('q'); |
149 |
my @fields = $param_names{'f[]'} ? $cgi->multi_param('f[]') : $cgi->multi_param('f'); |
150 |
my @op = $cgi->multi_param('op'); |
150 |
my @q = $param_names{'q[]'} ? $cgi->multi_param('q[]') : $cgi->multi_param('q'); |
|
|
151 |
my @op = $param_names{'op[]'} ? $cgi->multi_param('op[]') : $cgi->multi_param('op'); |
151 |
|
152 |
|
152 |
my $f; |
153 |
my $f; |
153 |
for (my $i = 0; $i < @fields; $i++) { |
154 |
for (my $i = 0; $i < @fields; $i++) { |
154 |
- |
|
|