List of envpl.cgi

このファイルは、実行が許可されています。
Fri Mar 29 01:49:10 2024

戻る

TEXTAREA で表示(カット&ペーストむき)

#!/usr/local/bin/perl5
print "Content-type: text/html\n\n";
print "<HTML>";
print "<HEAD><TITLE>environment</TITLE></HEAD>";
print "<BODY>\n";
print "<HR>\n";
print "<H1>環境変数の一覧</H1>\n";
print "SERVER_SOFTWARE $ENV{'SERVER_SOFTWARE'} <BR>";
print "SERVER_NAME $ENV{'SERVER_NAME'} <BR>";
print "REMOTE_HOST $ENV{'REMOTE_HOST'} <BR>";
print "REMOTE_ADDR $ENV{'REMOTE_ADDR'} <BR>";
print "HTTP_REFERER $ENV{'HTTP_REFERER'} <BR>";
print "HTTP_USER_AGENT $ENV{'HTTP_USER_AGENT'} <BR>";
print "HTTP_ACCEPT $ENV{'HTTP_ACCEPT'} <BR>";
print "<HR>\n";
print "<CENTER>\n";
print "<A HREF=\"$ENV{'HTTP_REFERER'}\">戻る</A>";
# HTTP_REFERER を使うと呼ばれたページへ戻れます。
print "</CENTER>\n";
print "<HR>\n";
print "</BODY>\n";
print "</HTML>\n";

戻る