Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Скриптовые языки программирования > Perl
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.01.2019, 03:44   #1
iliy.marin
 
Регистрация: 07.01.2019
Сообщений: 3
Вопрос Как задать source IP в Perl?

Доброго времени суток.
$src_host="тут_ип_сервера";
Нужна переменная, которая вставляет исходящий адрес сервера, то есть SOURCE IP

inet_addr(ip);
source_address;
s_addr
0.0.0.0
(эти вот варианты не подошли, не работает)

если я просто напишу реальный IP адрес сервера своего к примеру, то работать будет, только мне нужно, чтобы это через переменную какую-то делалось, не буду же я всегда в коде ип писать вручную, это бред... может кто знает решение данной проблемы?
iliy.marin вне форума Ответить с цитированием
Старый 07.01.2019, 11:59   #2
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Сделать запрос к https://ipv4.icanhazip.com/ и т.п.

Остальные варианты зависят от того где выполняется скрипт и могут не всегда работать.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 08.01.2019, 04:30   #3
iliy.marin
 
Регистрация: 07.01.2019
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Alex11223 Посмотреть сообщение
Сделать запрос к https://ipv4.icanhazip.com/ и т.п.

Остальные варианты зависят от того где выполняется скрипт и могут не всегда работать.
Данный запрос это не то, зачем делать обращение к стороннему домену, когда я могу задать на свой IP сервера любое слово или домен в файле hosts, и он будет использоваться.
Но мне-то не это нужно, мне нужно, чтобы как-то переменной сразу брался SOURCE IP, но вот вся проблема, что это не везде работает, и те варианты не сработали, что я использовал.
iliy.marin вне форума Ответить с цитированием
Старый 08.01.2019, 09:06   #4
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Цитата:
Сообщение от iliy.marin Посмотреть сообщение
это не везде работает, и те варианты не сработали, что я использовал.
Ну вот поэтому и проще спросить у внешнего сервера.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 11.01.2019, 10:09   #5
iliy.marin
 
Регистрация: 07.01.2019
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Alex11223 Посмотреть сообщение
Ну вот поэтому и проще спросить у внешнего сервера.
Alex11223, вы сейчас такую чушь пишите. Мол если твой сартир забит, не проще ли тогда ходить к соседу. Ндауж...
Чтобы узнать IP своего сервера и явно задать его, для этого не нужно мутить бредятину, тупо обращаясь к какому-то стороннему домену, на другой стороне планеты, и если он офф будет, то всё, голяк, такой бред блин... Самое простое и лучшее решение это использовать нужную переменную, и она должна быть. Просто вы не знаете о ней по всей видимости.
iliy.marin вне форума Ответить с цитированием
Старый 11.01.2019, 10:20   #6
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Это неподходящая аналогия.

Я ж сказал, что все другие варианты (которые вы уже попробовали или можете легко нагуглить по "perl get ip") зависят от окружения и не во всех случаях будут работать правильно.
Цитата:
Сообщение от iliy.marin Посмотреть сообщение
и если он офф будет, то всё
У вас IP каждую минуту меняется или у вас 100500 серверов?

Ну и можно использовать несколько сервисов на случай если один упал.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.

Последний раз редактировалось Alex11223; 11.01.2019 в 10:58.
Alex11223 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как исправить ошибку Unknown Source? SASFM Общие вопросы по Java, Java SE, Kotlin 5 18.06.2017 12:24
Python vs Perl, Я выбрал Perl! Причина: а черт ее знает но наверное дело в философии и синтаксисе(TMTOWTDI ) Sna1L Perl 0 13.12.2011 14:10