>  2009/08/23 (日) 22:45:40        [qwerty]
> > それは設定をいじる範囲内なのか
> > それともスクリプト自体をいじる必要があるのか
> > どっちだ(;´Д`)
> 処理ロジックをいじる必要があるよ(;´Д`)こんな感じ(CGIProxy 2.1beta19)
> 	# Create Referer: header if so configured.
> 	# Only include Referer: if we successfully remove $script_url+flags from
> 	#	start of referring URL.  Note that flags may not always be there.
> 	# If using @PROXY_GROUP, loop through them until one fits.	This could
> 	#	only be ambiguous if one proxy in @PROXY_GROUP is called through
> 	#	another proxy in @PROXY_GROUP, which you really shouldn't do anyway.
> 	if (!$e_hide_referer) {
> 		my($referer)= $ENV{'HTTP_REFERER'} ;
> 		if (@PROXY_GROUP) {
> 		foreach (@PROXY_GROUP) {
> 			print(S 'Referer: ', &wrap_proxy_decode($referer), "\015\012"), last
> 			if	$referer=~ s#^$_(/[^/]*/?)?##  &&  ($referer ne '') ;
> 			last if $referer eq '' ;
> 		}
> 		} else {
> 			#QWERTY i-modeリファラチェック対応
> 			my $qwerty_sw = 0;
> 			if( $referer eq ''){
> 				if( $host eq 'qwerty.on.arena.ne.jp'){
> 					if( $request_uri =~ /^\/cgi-bin\/bbs.cgi/){
> 						if ($ENV{'REQUEST_METHOD'} eq 'POST') {
> 							$referer = 'http://qwerty.on.arena.ne.jp/cgi-bin/bbs.cgi';
> 							$qwerty_sw = 1;
> 						}
> 					}
> 				}
> 			}
> 			if( $qwerty_sw == 0){
> 				print S 'Referer: ', &wrap_proxy_decode($referer), "\015\012"
> 					if	$referer=~ s#^$THIS_SCRIPT_URL(/[^/]*/?)?##  &&  ($referer ne '') ;
> 			}
> 			else{
> 				print S 'Referer: ', $referer, "\015\012";
> 			}
> 		}
> 	}

CGIProxy 2.1beta19を使えばいいということはよくわかった(;´Д`)残りの暗号部分に関しては解読待ちだ

参考:2009/08/23(日)22時41分21秒