dynamisches Auswerten der Umgebungsvariablen

<html>
<head>
<title>Embperl Examples - Loop Metacommands</title>
</head>
<body>

Embperl Examples - Loop Metacommands:

[$ while ($k, $v) = each (%ENV) $]
[+ $k +] = [+ $v +] <BR>
[$ endwhile $]

</body>
</html>
 

Embperl Examples - Loop Metacommands:

SERVER_SOFTWARE = Apache/1.3.0 (Unix) 
DOCUMENT_ROOT = /local/www/data 
GATEWAY_INTERFACE = CGI-Perl/1.1 
REMOTE_ADDR = 195.52.12.194 
SERVER_PROTOCOL = HTTP/1.1 
REQUEST_METHOD = GET 
TestEnv = 1234 
HTTP_USER_AGENT = Mozilla/4.0 (compatible; MSIE 4.01; Windows 95) 
QUERY_STRING = 
PATH = /bin:/usr/bin:/usr/ucb:/usr/bsd:/usr/local/bin 
EMBPERL_VIRTLOG = /embperl-log 
HTTP_CONNECTION = Keep-Alive 
HTTP_ACCEPT = image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, */* 
REMOTE_PORT = 1065 
HTTP_ACCEPT_LANGUAGE = de 
MOD_PERL = 1.11 
EMBPERL_OPTIONS = 0 
SCRIPT_FILENAME = /usr/msrc/embperl/eg/x/loop.htm 
HTTP_ACCEPT_ENCODING = gzip, deflate 
SCRIPT_NAME = /embperl/x/loop.htm 
SERVER_NAME = venus.gr.ecos.de 
REQUEST_URI = /embperl/x/loop.htm 
SERVER_PORT = 8765 
HTTP_HOST = www.gr.ecos.de:8765 
PATH_TRANSLATED = /usr/msrc/embperl/eg/x/loop.htm 
SERVER_ADMIN = root@venus.gr.ecos.de