Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Проверка по маске 
V
    Опции темы
TwiSteR
Дата 5.6.2006, 10:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Кибер красавчег
*


Профиль
Группа: Участник
Сообщений: 231
Регистрация: 15.6.2005
Где: World->Russia

Репутация: нет
Всего: 2



Приветствую уважаемые,

Тут такое дело, необходимо проверить существует ли IP адрес в в такой-то сети. К примеру:
IP - 192.168.0.5
NET - 192.168.0.0/24 

IP - 192.168.1.5
NET - 192.168.1.10/16

Может подскажите куда рыть ?

Добавлено @ 10:22 
Сорь вопрос снимается уже нашёл.

Код

use strict;
use Net::IP::Match::Regexp qw( create_iprange_regexp match_ip );
    
    my $regexp = create_iprange_regexp(
       qw( 192.168.0.0/24 )
    );
    if (match_ip("192.168.0.5", $regexp)) {
       print "ok";
    }
 
--------------------
PM MAIL WWW ICQ   Вверх
nitr
Дата 5.6.2006, 11:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



Можно просто `ping [params] your_testing_ip` ;)
не проще ли ;) ? и везде работать будет... я не видел современ. систем без ping'а ;)   

Это сообщение отредактировал(а) nitr - 5.6.2006, 11:58


--------------------
PM   Вверх
TwiSteR
Дата 6.6.2006, 07:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Кибер красавчег
*


Профиль
Группа: Участник
Сообщений: 231
Регистрация: 15.6.2005
Где: World->Russia

Репутация: нет
Всего: 2



nitr, 
Может я чего-то не догнал, но при чём тут пинг ? 
--------------------
PM MAIL WWW ICQ   Вверх
nitr
Дата 6.6.2006, 09:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



TwiSteR, извини, может я чего-то не догнал... что значит твоё "проверить существует ли IP адрес в в такой-то сети" ? smile 


--------------------
PM   Вверх
igorold
Дата 6.6.2006, 09:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 557
Регистрация: 22.12.2005
Где: Россия->Урал-& gt;Миасс

Репутация: 3
Всего: 17



TwiSteR имеет ввиду проверить адрес на существование из скрипта,
nitr, ты имеешь ввиду с консоли ... видимо ..  


--------------------
... у семи нянек 14 сисек ...  
Putin here, Putin there, Putin almost everywhere!
PM MAIL   Вверх
TwiSteR
Дата 6.6.2006, 12:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Кибер красавчег
*


Профиль
Группа: Участник
Сообщений: 231
Регистрация: 15.6.2005
Где: World->Russia

Репутация: нет
Всего: 2



Я имел виду проверить по маске входит ли айпи в эту сеть, а не на работоспособность хоста или ещё что-то. 
--------------------
PM MAIL WWW ICQ   Вверх
nitr
Дата 6.6.2006, 17:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



Это просто проверка входит ли в этот диапозон smile) а я про "реальное" существование smile)
Хотя пинг не может дать 100%-гарантии, к примеру, из-за "режима невидимости" предостав. фаерволлами smile 


--------------------
PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0449 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.