One of my applications has a select box which can get very large, however I have found that the Apache::ASP does not handle it particularly well. I have tested it with the following two scripts. The asp version craps out at about 165 while the CGI handles at least 1000 everytime. I have the file upload max set well beyond 165.

Here are the test scripts.

#!/usr/bin/perl /usr/bin/asp-perl
# first the large select box form

<form name="main" action="env.cgi" method="POST">
 <input type="text" name="sx">
 <select name="test" multiple size="10">
 <%foreach my $i (1..1000) {%>
 <option value="<%=$i%>" SELECTED><%=$i%></option>
 <%}%>
 </select>
 <input type="submit">
</form>

#!/usr/bin/perl /usr/bin/asp-perl
# the asp dump of the values
<%
my $fh = $Request->Form();
my $p=1;
%>
Form Results<br>
-------------------------------------<br>
<%foreach my $key (keys %{$fh}) {%>
 <%=$key . ' = '. $fh->{$key} . '<br>'%>
 <%if ($fh->{$key} =~ 'ARRAY') {
   foreach my $i (@{$fh->{$key}}) {%>
   <%=$p++%>.&nbsp;&nbsp;&nbsp;<%= $i %><br>
   <%} $p=1;%>
 <%}%>
<%}%>
<br>


#!/usr/bin/perl # the CGI dump of the values use CGI;

my $cgi = new CGI;

print $cgi->header;
print 'QueryString Results<br>';

my @values = $cgi->param('test');
foreach my $key (@values) {
 print $key . '<br>';
}

Any help will be greatly appreciated.

Steve



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to