post.cgi

#!/usr/bin/perl -wT
use CGI qw(:standard);
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
use strict;

print header;
print start_html("Thank You");

my %form;

## Loop on all params and print their values
foreach my $p (param()) {
        $form{$p} = param($p);
        print "$p = $form{$p}<br>\n";
}
print end_html;

Generated by GNU enscript 1.6.4.