#!/usr/local/bin/perl
($field_name, $user_name) = split (/=/, $ENV {'QUERY_STRING'});
$user_name =~ s/\+/" "/eg;
print "Content-type: text/html", "\n\n";
print "\n\nRegistration Results\n\n";
print "\n";
print "Hey, ", $user_name, ",thanks for
registering!
";
print "\n";