I wish it were in the script... but then, why would it work fine on other platforms (and on other networks)? I did contact my ISP and got a terse response from someone suggesting the code is wrong. But, geez, it's 30 lines long. Here it is. I hope it is in the script and someone can tell me what the problem is... Anyone???
#!C:\perl\bin\perl -w
#This script shows the current standings.
use CGI;
use strict;
$| = 1;
my $query = new CGI;
print $query->header("text/html");
print "<html><body>\n";
#print out the text fields that were submitted via the form.
for my $val ($query->param) {
my $ct = 1;
print "<BR>submitted $val: ";
foreach ($query->param($val)) {
print "<BR>$ct [" . $query->param($val) . "]\n";
$ct += 1;
}
}
print "<form name=frmSize method=Post>\n";
#Create 200 text fields
for (my $i = 0; $i < 200; $i++)
{
#Create a text field with 100 bytes of data
print "<BR>input box $i:<input type=text size=110 name=\"x\" value
+=\"012345678901234567890123456789012345678901234567890123456789012345
+6789012345678901234567890123456789\">\n";
}
print "<BR><input type=submit></form>\n";
print "</body></html>\n";
exit 0;
