use CGI qw/:standard/; my $query = new CGI; my %in = $query->Vars;