use strict;
use CGI qw(:standard);

print header, start_html, pre;

foreach my $name (param) {
    print "$name = ", param($name), "\n";
}