CGIplus Variables (usage count 1) ----------------- AUTH_TYPE="" CONTENT_LENGTH="0" CONTENT_TYPE="" CSP_NONCE="45fa87e4619ccadf14974d7a34cf5d3" DOCUMENT_ROOT="" GATEWAY_EOF="$Z-ED3FF4813022584EA24AAC77-" GATEWAY_EOT="$D-6D05264CB65D86DD4F9B37FA-" GATEWAY_ESC="$E-D91D8533E19A40D8BEA8E4F9-" GATEWAY_INTERFACE="CGI-PerlEx" GATEWAY_MRS="4492" HTTP_ACCEPT="*/*" HTTP_ACCEPT_ENCODING="gzip, br, zstd, deflate" HTTP_HOST="wasd.kicks-ass.net" HTTP_USER_AGENT="Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; +claudebot@anthropic.com)" KEY_COUNT="0" PATH_INFO="/wasd_root/src/perl" PATH_ODS="5" PATH_TRANSLATED="WASD_ROOT:[src]perl" QUERY_STRING="" REMOTE_ADDR="3.147.51.60" REMOTE_HOST="ec2-3-147-51-60.us-east-2.compute.amazonaws.com" REMOTE_PORT="33266" REMOTE_USER="" REQUEST_METHOD="GET" REQUEST_PROTOCOL="HTTP/2" REQUEST_SCHEME="https:" REQUEST_TIME_GMT="Wed, 16 Oct 2024 18:52:37 GMT" REQUEST_TIME_LOCAL="Thu, 17 Oct 2024 05:22:37" REQUEST_URI="/cgiplus-bin/CGIplusPM_example1.pl/wasd_root/src/perl" SCRIPT_FILENAME="CGI-BIN:[000000]cgipluspm_example1.pl" SCRIPT_NAME="/cgiplus-bin/CGIplusPM_example1.pl" SERVER_ADDR="45.249.118.87" SERVER_CHARSET="ISO-8859-1" SERVER_GMT="+10:30" SERVER_NAME="x86vms.dyndns.org" SERVER_PORT="443" SERVER_PROTOCOL="HTTP/1.1" SERVER_SIGNATURE="
WASD/12.2.5 Server at x86vms.dyndns.org Port 443
" SERVER_SOFTWARE="HTTPd-WASD/12.2.5 OpenVMS/X86 SSL" UNIQUE_ID="719fb3e2706f5e4aafe" ----------------- Demonstrate that the CGIplus::var() function and $ENV associative array contents are identical ... $ENV{'SCRIPT_NAME'} |/cgiplus-bin/CGIplusPM_example1.pl| CGIplus::var('SCRIPT_NAME') |/cgiplus-bin/CGIplusPM_example1.pl| $ENV{'PATH_INFO'} |/wasd_root/src/perl| CGIplus::var('PATH_INFO'} |/wasd_root/src/perl| $ENV{'QUERY_STRING'} || CGIplus::var('QUERY_STRING') || SERVER_SOFT does not exist and looks like an empty string ... SERVER_SOFT || SERVER_SOFTWARE should exist ... SERVER_SOFTWARE |HTTPd-WASD/12.2.5 OpenVMS/X86 SSL|