> #!/usr/local/bin/perl
> 	print "Content-type: text/html\n\n";
> @ip = { 'xxx.xxx.xxx.xxx', 'xxx.xxx.xxx.xxx', 'xxx.xxx.xxx.xxx' };
> foreach @ip {
>     if($ENV{'REMOTE_ADDR'} eq $_) {
>         print "何もない";
>         exit;
>     }
> }
> exit;
> http://どこがエラーかわかるﾔｼいる？

foreachブロックの書き方を見れ

参考：2000/08/27(日)18時09分40秒