use CGI qw(:standard);
# later...
$cgi = new CGI();
map { ... } $cgi->param();