Help for this page

Select Code to Download


  1. or download this
    my $remote = $ENV{REMOTE_ADDR};
    return(0) unless grep /$remote/, @$hosts;
    
  2. or download this
    my $remote = $ENV{REMOTE_ADDR};
    return 0 unless grep $remote eq $_, @$hosts;