use CGI;

my $cgi = CGI->new();
my %params = $cgi->Vars();

print $cgi->header();