環境変数の確認

CGIを書くのに、環境変数がどうなっているか気になったりします。 適当にググれば環境変数を出力するCGIはみつかると思いますが、 参考までにここにも掲載します。 ここをクリックするとCGIを実行します。

#!/usr/local/bin/perl
# 環境変数を表示

print "content-type: text/html\n\n";

print "<html><body>\n";
print "<h1>環境変数</h1><hr>\n\n";
print "<table border=\"1\">\n";
print "<tr><td>変数</td><td>値</td></tr>\n";

foreach $key( keys %ENV ){
    print "<tr><td>$key</td><td>$ENV{$key}</td></tr>\n";
}

print "</table>\n";
print "</body></html>\n";

戻る戻る
記述内容について一切保障しません。リンクは自由に行ってかまいません。