use strict;
use CGI;

my ($cgi, $key, %IN); 

$cgi = new CGI;
%IN = $cgi->Vars; #%IN = (param1 => value1, param2 => value2 , etc..);