#!/usr/bin/perl -wT
print <
About this Server
About this Server
Server Name: $ENV{SERVER_NAME}
Listening on Port: $ENV{SERVER_PORT}
Server Software: $ENV{SERVER_SOFTWARE}
Server Protocol: $ENV{SERVER_PROTOCOL}
CGI Version: $ENV{GATEWAY_INTERFACE}
-------------------------
Content Length: $ENV{CONTENT_LENGTH}
Content Type: $ENV{CONTENT_TYPE}
Document Root: $ENV{DOCUMENT_ROOT}
Query String: $ENV{QUERY_STRING}
Remote Address: $ENV{REMOTE_ADDR}
Remote Host: $ENV{REMOTE_HOST}
-------------------------
Referer: $ENV{HTTP_REFERER}
User Agent: $ENV{HTTP_USER_AGENT}
HTTPS(?): $ENV{HTTPS}