#!/usr/local/bin/perl

print "Content-type: text/html\n\n";
print "<html>\n<head>\n<title>TestSuccess</title>\n</head>\n";
print "<body bgcolor=\"A0B4DC\">";
print "<center><h1>Perl Script: test.pl</h1>\n\n";
print "<hr size=3 width=100%>\n";
print "<p>";
print "This Perl script is located in the \"cgi\" directory below your home";
print " directory. It's simple,<br>but shows the capabilities you have."; 
print "You can load any Perl CGI script<br> in that directory, then call ";
print "or email the Webmaster at<br>EarthLink to have the script";
print " \"activated\".\n";
print "<p>";
print "<hr size=3 width=50%>\n";
print "<p>";
print "Go <a href=\"$ENV{'HTTP_REFERER'}\"><em><h3>Back</em></h3></a> to home"; 
print " page.</center>\n";
print "<p>";
print "<hr size=3 width=30%><p>";
print "<center>Thanks for visiting,\n";
print "guest from <h3><em>\"$ENV{REMOTE_HOST}\"</h3></em>";
print "</center>";
print "</body>";
print "</html>";

