> > #!/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時15分36秒