#!/usr/bin/perl use strict; use warnings; use CGI; my $q = CGI->new; print $q->header("text/html"); print "Form Output"; print "

Results from FORM post

\n"; foreach my $key ($q->param) { print $q->param($key) . "
"; } print "";