#!/usr/local/bin/perl
# Author: David Corcoran
# This is published under the GNU Public License, for more information
# please visit http://www.gnu.org
#
# This test CGI will print back the value of the calling pages form
do "cgi-lib.pl" || die "Cannot do cgi-lib.pl\n";
&ReadParse;
$name = $in{'moniker'};
print "Content-type: text/html \n\n";
print "Test CGI\n";
print "\n";
print "The name is $name
\n";
print "\n";
print "\n";
exit(0);