クライアントのIPアドレスを得る

　クライアントのIPアドレスを得るには環境変数 $ENV{'REMOTE_ADDR'} を参照する。

	$ip_addr = $ENV{'REMOTE_ADDR'};