#!/usr/local/bin/perl ## print << EOF print "Content-type: text/html", "\n\n"; print "", "\n"; print "About This Server", "\n"; print "

About This Server

", "\n"; print "
";
print "Server Name:	", $ENV{'SERVER_NAME'}, "
", "\n"; print "Running on port: ", $ENV{'SERVER_PORT'}, "
", "\n"; print "Server Software: ", $ENV{'SERVER_SOFTWARE'}, "
", "\n"; print "Server Protocol: ", $ENV{'SERVER_PROTOCOL'}, "
", "\n"; print "CGI REvision: ", $ENV{'GATEWAY_INTERFACE'}, "
", "\n"; print "
", "\n"; print "", "\n";