#!/usr/local/bin/perl print "Content-type: text/html\n\n"; print "\n\nYour First Perl Script\n\n"; print ""; print "

"; print "

"; print ""; print "

Your First Perl Script

\n\n"; print "
\n"; print "

"; print ""; print ""; print ""; print ""; print "
"; print ""; print ""; print "Welcome \"$ENV{REMOTE_HOST}\"!!!"; print "

"; print " My name is Blinky and I'm here to introduce you to"; print " your first CGI script. First, let me tell you some information."; print " Your current IP address is \"$ENV{'REMOTE_ADDR'}\" and"; print " you came to this page from this URL: \"$ENV{'HTTP_REFERER'}\""; print " The name of this script is \"$ENV{'SCRIPT_NAME'}\" and"; print " it is written in Perl, the most popular language used in writing CGI scripts."; print "

"; print "Though this script is fairly simple, it gives you an idea of the many"; print " useful tasks that can be accomplished by using CGI scripts."; print "

"; print "Your Perl scripts need to be uploaded in the \"cgi\" directory of your"; print " home directory. It is very important to note that Perl scripts must "; print "be uploaded in text/ASCII mode. To activate your script, send a message "; print "to websupport\@earthlink.net"; print "

"; print "Thanks for visiting,"; print "

"; print "--- Blinky"; print "


"; print "
"; print "Previous Page"; print "
"; print ""; print "
"; print "

"; print "

"; print "

\n"; print ""; print ""; print "";