linuxサーバーの環境変数をperlで表示させる方法

linuxサーバーの環境変数をperlを使って表示させるには、以下のスクリプトを 〇〇.cgi にてサーバー上に作成して、実行権を付与して、ブラウザからアクセスします。

#!/usr/local/bin/perl
print "Content-type: text/html", "\n\n";
print "<HTML><BODY>", "\n";
print "<H1>ENV</H1><HR>", "\n";
foreach my $key( keys %ENV ){
print "$key: $ENV{$key} ";
print "<BR />", "\n";
}
print "<HR>", "\n";
print "</BODY></HTML>", "\n";

実行結果。

display_environment_variables_linux_using_perl.png

ぐっどらっこ。