@aliens = ('205.204.167.190', '12.13.171.200', '195.161.35.195');
#Теперь определим вышеуказанные переменные:
$remip = ${ENV{REMOTE_ADDR}};
$proxy = ${ENV{HTTP_VIA}};
$realip = ${ENV{HTTP_X_FORWARDED_FOR}};
#Далее проведём проверку на чужих:
$alienhere = 0;
foreach $address (@aliens) {
if ($remip eq $address || $realip eq $address){
$alienhere = 1;
}
}

$aliens = array('205.204.167.190', '12.13.171.200', '195.161.35.195');
#Теперь определим вышеуказанные переменные:
$remip = $_SERVER['REMOTE_ADDR'];
#Далее проведём проверку на чужих:
$alienhere = 0;
foreach ($aliens as $address) {
    if ($remip == $address)    $alienhere = 1;
}