Help for this page

Select Code to Download


  1. or download this
    if (grep { $name eq $_ } @list and $ENV{REMOTE_ADDR} ne "$ip" ) {.....
  2. or download this
    my %hash = qw/name ip name2 ip2 name3 ip3/;
if ( exists $hash{$name} and $ENV{REMOTE_ADDR} ne $hash{$name} ) {....
+..