Lines 150-159
if ( defined $format ) {
Link Here
|
150 |
} |
150 |
} |
151 |
} |
151 |
} |
152 |
|
152 |
|
153 |
my @c = $cgi->multi_param('c'); |
153 |
my %param_names = map { $_ => 1 } $cgi->multi_param; |
154 |
my @fields = $cgi->multi_param('f'); |
154 |
my @c = $param_names{'c[]'} ? $cgi->multi_param('c[]') : $cgi->multi_param('c'); |
155 |
my @q = $cgi->multi_param('q'); |
155 |
my @fields = $param_names{'f[]'} ? $cgi->multi_param('f[]') : $cgi->multi_param('f'); |
156 |
my @op = $cgi->multi_param('op'); |
156 |
my @q = $param_names{'q[]'} ? $cgi->multi_param('q[]') : $cgi->multi_param('q'); |
|
|
157 |
my @op = $param_names{'op[]'} ? $cgi->multi_param('op[]') : $cgi->multi_param('op'); |
157 |
|
158 |
|
158 |
my $f; |
159 |
my $f; |
159 |
for (my $i = 0; $i < @fields; $i++) { |
160 |
for (my $i = 0; $i < @fields; $i++) { |
160 |
- |
|
|