Perl Programming ❯ Environment Variables

#!/usr/bin/perl -wT use CGI':standard'; use strict; use CGI::Carp qw(warningsToBrowser fatalsToBrowser); print "Content-type: text/html\n\n"; print "<!DOCTYPE html>"; print "<html><head><title>Environment Variables</title></head>"; print "<body>"; foreach (keys %ENV) { print "<div style='font-family:Monospace;'><span style='color:#0000cc;'>$_</span>: <span style='color:#cc0000;'>$ENV{$_}</span></div>"; } print "</body></html>";

Environment Variables

SCRIPT_NAME: /programming/perl/cgi-bin/02.cgi

HTTP_CF_IPCOUNTRY: US

HTTP_CF_RAY: 876c0f6b2e3f7d7d-LAX

REQUEST_METHOD: GET

HTTP_CF_CONNECTING_IP: 143.95.158.41

SCRIPT_FILENAME: /home2/ihypress/public_html/programming/perl/cgi-bin/02.cgi

REQUEST_SCHEME: http

SERVER_SOFTWARE: Apache

HTTP_CF_VISITOR: {"scheme":"https"}

HTTP_CDN_LOOP: cloudflare

QUERY_STRING: 

REMOTE_PORT: 26184

SERVER_SIGNATURE: 

PATH: /usr/local/bin:/usr/bin:/bin

GATEWAY_INTERFACE: CGI/1.1

SCRIPT_URL: /programming/perl/cgi-bin/02.cgi

DOCUMENT_ROOT: /home2/ihypress/public_html

UNIQUE_ID: ZiJBPxP3h8Wvo4YzmkEqnAAAAMM

SERVER_NAME: ihypress.net

HTTP_ACCEPT_ENCODING: gzip, br

SERVER_ADMIN: webmaster@ihypress.net

HTTP_CONNECTION: Keep-Alive

SCRIPT_URI: http://ihypress.net/programming/perl/cgi-bin/02.cgi

CONTEXT_PREFIX: 

TZ: America/Chicago

HTTP_X_FORWARDED_PROTO: https

SERVER_PORT: 80

REMOTE_ADDR: 143.95.158.41

CONTEXT_DOCUMENT_ROOT: /home2/ihypress/public_html

SERVER_PROTOCOL: HTTP/1.1

REQUEST_URI: /programming/perl/cgi-bin/02.cgi

SERVER_ADDR: 143.95.227.53

HTTP_HOST: ihypress.net