CGIplus Variables (usage count 1)
-----------------
AUTH_TYPE=""
CONTENT_LENGTH="0"
CONTENT_TYPE=""
CSP_NONCE="b620bbf24c9c3fc0b8a731ba61a6917"
DOCUMENT_ROOT=""
GATEWAY_EOF="$Z-562CAB47F1BEC2DC0883362D-"
GATEWAY_EOT="$D-B0FFAB0A63757903153A0E68-"
GATEWAY_ESC="$E-00A0D1497CB14C762752387F-"
GATEWAY_INTERFACE="CGI-PerlEx"
GATEWAY_MRS="16492"
GATEWAY_QIO="30408"
HTTP_ACCEPT="*/*"
HTTP_ACCEPT_ENCODING="gzip, br, zstd, deflate"
HTTP_HOST="wasd.vsm.com.au"
HTTP_USER_AGENT="Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; +claudebot@anthropic.com)"
KEY_COUNT="0"
PATH_INFO="/ht_root/src/perl"
PATH_ODS="5"
PATH_TRANSLATED="WASD_ROOT:[src]perl"
QUERY_STRING=""
REMOTE_ADDR="18.189.141.106"
REMOTE_HOST="ec2-18-189-141-106.us-east-2.compute.amazonaws.com"
REMOTE_PORT="10821"
REMOTE_USER=""
REQUEST_METHOD="GET"
REQUEST_PROTOCOL="HTTP/1.1"
REQUEST_SCHEME="http:"
REQUEST_TIME_GMT="Sun, 23 Feb 2025 02:22:46 GMT"
REQUEST_TIME_LOCAL="Sun, 23 Feb 2025 12:52:46"
REQUEST_URI="/cgiplus-bin/CGIplusPM_example1.pl/ht_root/src/perl"
SCRIPT_FILENAME="CGI-BIN:[000000]CGIPLUSPM_EXAMPLE1.PL"
SCRIPT_NAME="/cgiplus-bin/CGIplusPM_example1.pl"
SERVER_ADDR="119.252.17.13"
SERVER_CHARSET="ISO-8859-1"
SERVER_GMT="+10:30"
SERVER_NAME="wasd.vsm.com.au"
SERVER_PORT="80"
SERVER_PROTOCOL="HTTP/1.1"
SERVER_SIGNATURE="<address>WASD/12.3.0 Server at wasd.vsm.com.au Port 80</address>"
SERVER_SOFTWARE="HTTPd-WASD/12.3.0 OpenVMS/IA64 SSL"
UNIQUE_ID="c05e16d6af503c30ef6"
-----------------

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'}    |/ht_root/src/perl|
CGIplus::var('PATH_INFO'}    |/ht_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.3.0 OpenVMS/IA64 SSL|