Test perl CGI script
CONTEXT_DOCUMENT_ROOT="/home/hosting_ivanych/projects/yoharu/cgi-bin/"
CONTEXT_PREFIX="/cgi-bin/"
DOCUMENT_ROOT="/home/hosting_ivanych/projects/yoharu/htdocs"
GATEWAY_INTERFACE="CGI/1.1"
HTTP_ACCEPT="*/*"
HTTP_ACCEPT_ENCODING="gzip, br, zstd, deflate"
HTTP_CACHE_CONTROL="max-age=0"
HTTP_CONNECTION="close"
HTTP_HOST="www.yohanna.ru"
HTTP_USER_AGENT="Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; +claudebot@anthropic.com)"
HTTP_VIA="1.1 squid-proxy-5b5d847c96-wlw2x (squid/6.10)"
HTTP_X_REAL_IP="216.73.216.121"
HTTP_X_SID="1161"
PATH="/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin"
QUERY_STRING=""
REMOTE_ADDR="216.73.216.121"
REMOTE_PORT="9662"
REQUEST_METHOD="GET"
REQUEST_SCHEME="http"
REQUEST_URI="/cgi-bin/perl.pl"
SCRIPT_FILENAME="/home/hosting_ivanych/projects/yoharu/cgi-bin/perl.pl"
SCRIPT_NAME="/cgi-bin/perl.pl"
SERVER_ADDR="127.0.0.1"
SERVER_ADMIN="[no address given]"
SERVER_NAME="www.yohanna.ru"
SERVER_PORT="80"
SERVER_PROTOCOL="HTTP/1.0"
SERVER_SIGNATURE=""
SERVER_SOFTWARE="Apache/2.4.25"