my $input = new CGI();
my %hash = map { $_, $input->param($_) } $input->param();