Select Code to Download

# A simple HTTP request parser to emulate ASP request.xxx<
...
    
    return \%vars;
}

use CGI ':standard';
print "Content-type: text/html\n\n";
...

        print "<p><b>Key:</b> $name <b>Value(s):</b> @values";
        }

$request = getHTTPData();

print "<br> fromtime is ". $request->{"fromTime"};

for each fld in request.form
# do stuff with the name and value
next

foreach fld in formdata{

make a variable named $fld  have a value of $value

}