Form Data with CGI.PM

[Guest_imported]

I've never used CGI.pm. I used to have a nifty subroutine I wrote that did the functions I needed. Unfortunately, the new server I'm on doesn't like it.

What's the command to get form data from a page using CGI.pm?

My code looks like this:
###########################
use CGI;

$user = param('user');
$pass = param('pass');
###########################

Upon the line starting with "$user" the script just ends. No subsequent commands are done, and in a browser, all I get is a blank page. Any print statements before this point show up, and the script has been properly configured on the server.

 

[toolkit]

First off, instead of:

use CGI;

Try:

use CGI qw( :all );

This will import all CGI subroutines into the main package.
If this doesn't work, check the server log files. There may be a clue as to what is going wrong in there. Also, you can run the CGI script from the command line, and see what output is generated.

Cheers, Neil

 

[motte]

You need to create an object of type CGI in order to use the methods in the module.

use CGI qwcommon);

#create your object
my $cgi = CGI->new();

#prints your page header
print $cgi->header('text/html');

#this will give you all the values in the form
foreach my $p($cgi->param()){
$input{$p} = $cgi->param($p);
print $input{$p};
print &quot;<br>&quot;;
}

Hope these little bits help.

Mike

 

[Guest_imported]

Thanks a lot to the both of you!

Just in case anyone else ever sees this, you have to &quot;combine&quot; both their answers if you're trying to extract form data into a variable.

If you use Motte's code, and want to use the &quot;$user = param('user');&quot; terms, you have to have &quot;use CGI qw( :all )&quot; above it, not common. It doesn't work with common, or at least for me it didn't.