#!/usr/bin/perl use CGI qw(:standard); print header(), start_html("Thank you"), h1("Thank you"), h2("You supplied the following information"); foreach $name (param()) { $s .= "<B>" . $name . "</B>: " . param($name) . " "; } chop($s); print p($s), end_html();