Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
MityOk
Зарегистрирован: 26.12.2002 Сообщения: 20 Откуда: Kogalym
|
Добавлено: Вт Дек 24 2002 17:31 Заголовок сообщения: Как в скрипте CGI на Perl определить адрес клиента |
|
|
Подскажите, а...
Поясняю проблему:
Имеем некий CGI скрипт, который в зависимости от того, кто к нему обратился, скажем, меняет поведение. Видимо сам должен определять IP адрес клиента (мне так хотелось бы). Настройки сервера трогать нежелательно, хотя можно наверное у него что-то спросить (переменные там, или еще чего). |
|
Вернуться к началу |
|
|
Mons
Зарегистрирован: 23.12.2002 Сообщения: 11 Откуда: Долгопрудный
|
Добавлено: Вт Дек 24 2002 18:32 Заголовок сообщения: Re: Как в скрипте CGI на Perl определить адрес клиента |
|
|
$ENV{'REMOTE_ADDR'} - IP $ENV{'REMOTE_HOST'} - Host |
|
Вернуться к началу |
|
|
MityOk
Зарегистрирован: 26.12.2002 Сообщения: 20 Откуда: Kogalym
|
Добавлено: Вт Дек 24 2002 18:57 Заголовок сообщения: Re: Как в скрипте CGI на Perl определить адрес клиента |
|
|
Спасибо. Только что откопал это на Perl.ru Если верно понял, то $ENV{'REMOTE_HOST'} передается только если имя определено. Это так? Скрипт в виде use CGI qw(:standard);
print header,start_html; foreach (keys %ENV) { print $_,'=',$ENV{$_},br; } print end_html;
Мне такого параметра на показал, хотя клиентский хост прописан в DNS и в /etc/hosts
В каких же случаях это работает? |
|
Вернуться к началу |
|
|
|