どうしてASAHIネットが弾かれているかが(;´Д`)

if ( ( $ENV{'HTTP_REFERER'} eq "http://www.strangeworld.org/cgi-bin/bbs.cgi" ) || ( $ENV{'HTTP_REFERER'} 
eq "http://sakashita.strangeworld.org/cgi-bin/upload.cgi" ) 
|| ( $ENV{'HTTP_REFERER'} eq "http://219.111.1.60/cgi-bin/bbs.cgi" ) 
|| ( index($ENV{'REMOTE_HOST'}, '.asahi-net.or.jp') > 0 ) 
|| ( $ENV{'REMOTE_ADDR'} eq '219.164.150.202' ) 
# CBX ) {# 何もしない} else {# 弾き処理print 
<< "HTML";Content-type: text/html;Location: http://219.111.1.60/cgi-bin/_return.cgiヽ(´ー｀)ノ~~~~~HTML　
exit;}