Re: Beginning Perl & Forms

Make sure you have a look at the CGI man page, the documentation is pretty thorough and easy to follow.

Also have a look at Carp- it replaces those horrible HTTP 500 errors with something a little more useful.

The following script should do what you want though (and hopefully point you in the right direction):

#!/usr/bin/perl -wT

use CGI;
use CGI::Carp qw(fatalsToBrowser); #makes any error messages appear in
+ the browser

$query = new CGI;   #instantiates new CGI object

@params = $query->param;   #fetches names of all parameters passed to 
+the script

print $query->header,$query->start_html('Show Params');      #prints h
+ttp header, html tags up to <body>

#loop through the list of parameters and print each out on
#a separate line.
foreach $parameter(@params) {
   print $parameter, 
         ": ",
         $query->param($parameter),
         $query->br;
}

print $query->end_html;
[download]

*~-}hotyopa{-~*

Comment on Re: Beginning Perl & Forms - 2 Download Code