CGI(Perl)で環境変数を取得するサンプルプログラム

HTTP環境変数一覧へ戻る

以下は、各環境変数を取得して、ブラウザ画面に表示するサーバサイドプログラムのサンプルです。

#!/usr/bin/perl

$strServerName = $ENV{"SERVER_NAME"};
$strGatewayInterface = $ENV{"GATEWAY_INTERFACE"};
$strServerProtocol = $ENV{"SERVER_PROTOCOL"};
$strRequestMethod = $ENV{"REQUEST_METHOD"};
$strPathInfo = $ENV{"PATH_INFO"};
$strScriptName = $ENV{"SCRIPT_NAME"};
$strQueryString = $ENV{"QUERY_STRING"};
$strRemoteAddr = $ENV{"REMOTE_ADDR"};
$strRemoteHost = $ENV{"REMOTE_HOST"};
$numContentLength = $ENV{"CONTENT_LENGTH"};
$strHttpUserAgent = $ENV{"HTTP_USER_AGENT"};
$strHttpReferer = $ENV{"HTTP_REFERER"};

print "Content-Type: text/html\n\n";

print <<"EOF";
<html>
<body>
SERVER_NAME = ${strServerName} 
GATEWAY_INTERFACE = ${strGatewayInterface} 
SERVER_PROTOCOL = ${strServerProtocol} 
REQUEST_METHOD = ${strRequestMethod} 
PATH_INFO = ${strPathInfo} 
SCRIPT_NAME = ${strScriptName} 
QUERY_STRING = ${strQueryString} 
REMOTE_ADDR = ${strRemoteAddr} 
REMOTE_HOST = ${strRemoteHost} 
CONTENT_LENGTH = ${numContentLength} 
HTTP_USER_AGENT = ${strHttpUserAgent} 
HTTP_REFERER = ${strHttpReferer} 
</body>
</html>
EOF

HTTP環境変数一覧へ戻る

Webプログラマになりたい人のためのスクール・講座情報

クリエイターの皆さん！お仕事ありますよ！フェローズに！

パソコンスクールガイド
積極的な情報収集が目標実現の近道です。

就職・起業・SOHO・それとも副業？デジハリがノウハウを伝授！

就転職に強い、資格取得スキルアップ専門校ヒューマンアカデミー

CsideNet レンタルサーバーサブドメイン型　780円/月　
CGI/SSI/PHPはもちろんデータベース(MySQL)、ブログ(Movable Type)まで利用できます。1週間の試用期間があるのがGood!!

転職・派遣・就職・アルバイトの求人情報検索支援サイト～ 14ALL JOB SEARCH ～

「Webプログラミング研究所」TOPへ