#### ## grab form input my $query = CGI->new(); my @formfields = $query->param; for my $field(@formfields) { $FORM{$field} = $query->param($field); }