foreach $key (CGI::param()) { ${$key} = CGI::param($key) }