#!/usr/bin/perl # Simple example of GN exec type script. This is NOT a CGI script. # But all the CGI environment variables are available to it. print( "PATH_INFO = ", $ENV{PATH_INFO}, "\n"); print( "SERVER_SOFTWARE = ", $ENV{SERVER_SOFTWARE}, "\n"); print( "SERVER_NAME = ", $ENV{SERVER_NAME}, "\n"); print( "SERVER_PROTOCOL = ", $ENV{SERVER_PROTOCOL}, "\n"); print( "SERVER_PORT = ", $ENV{SERVER_PORT}, "\n"); print( "HTTP_ACCEPT = ", $ENV{HTTP_ACCEPT}, "\n"); print( "HTTP_REFERER = ", $ENV{HTTP_REFERER}, "\n"); print( "HTTP_USER_AGENT = ", $ENV{HTTP_USER_AGENT}, "\n"); print( "PATH_TRANSLATED = ", $ENV{PATH_TRANSLATED}, "\n"); print( "SCRIPT_NAME = ", $ENV{SCRIPT_NAME}, "\n"); print( "QUERY_STRING = ", $ENV{QUERY_STRING}, "\n"); print( "REMOTE_HOST = ", $ENV{REMOTE_HOST}, "\n"); print( "REMOTE_ADDR = ", $ENV{REMOTE_ADDR}, "\n"); .