The following are the environment variables:

CONTEXT_DOCUMENT_ROOT : /home/gmtyiais/public_html/nitsche.mobi
CONTEXT_PREFIX : 
DOCUMENT_ROOT : /home/gmtyiais/public_html/nitsche.mobi
GATEWAY_INTERFACE : CGI/1.1
HTTP_ACCEPT : text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
HTTP_ACCEPT_ENCODING : br,gzip
HTTP_ACCEPT_LANGUAGE : en-US,en;q=0.5
HTTP_CONNECTION : Keep-Alive
HTTP_HOST : nitsche.mobi
HTTP_IF_MODIFIED_SINCE : Sun, 20 Sep 2020 09:48:15 GMT
HTTP_USER_AGENT : CCBot/2.0 (https://commoncrawl.org/faq/)
PATH : /usr/local/bin:/usr/bin:/bin
QUERY_STRING : 
REMOTE_ADDR : 3.216.79.60
REMOTE_PORT : 41164
REQUEST_METHOD : GET
REQUEST_SCHEME : http
REQUEST_URI : /2014/stanford/cgi-bin/env.pl
SCRIPT_FILENAME : /home/gmtyiais/public_html/nitsche.mobi/2014/stanford/cgi-bin/env.pl
SCRIPT_NAME : /2014/stanford/cgi-bin/env.pl
SCRIPT_URI : http://nitsche.mobi/2014/stanford/cgi-bin/env.pl
SCRIPT_URL : /2014/stanford/cgi-bin/env.pl
SERVER_ADDR : 142.11.203.174
SERVER_ADMIN : webmaster@nitsche.mobi.mydomain798824.com
SERVER_NAME : nitsche.mobi
SERVER_PORT : 80
SERVER_PROTOCOL : HTTP/1.1
SERVER_SIGNATURE : 
SERVER_SOFTWARE : Apache
TZ : America/Los_Angeles
UNIQUE_ID : X7wAICiilsKCq@xVgHPp@gAAAAk


The following is the source of this programme:
#!/usr/bin/perl

# programme for showing enviroment variables

print "Content-type: text/plain\n\n";

print "\n";

print "The following are the environment variables:\n";

@ListOfKeys = keys(%ENV);
@SortedListOfKeys = sort(@ListOfKeys );
print "\n";
foreach (@SortedListOfKeys)
 {
  print $_;
  print " : ";
  print $ENV{$_};
  print "\n";
 }
print "\n";

print "\n";

print "The following is the source of this programme:\n";
$filename = $ENV{'SCRIPT_FILENAME'};
open(FILE, "<$filename");
while(<FILE>)
 {
  print $_;
 }
close(FILE);

print "\n";