Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

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

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

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

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

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

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

icq: 512-765
skype: alexp.frl
По умолчанию

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

Остальные варианты зависят от того где выполняется скрипт и могут не всегда работать.
Alex11223 на форуме   Ответить с цитированием
Старый 08.01.2019, 05:30   #3
iliy.marin
Новичок
 
Регистрация: 07.01.2019
Сообщений: 3
Репутация: 10
По умолчанию

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

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

icq: 512-765
skype: alexp.frl
По умолчанию

Цитата:
Сообщение от iliy.marin Посмотреть сообщение
это не везде работает, и те варианты не сработали, что я использовал.
Ну вот поэтому и проще спросить у внешнего сервера.
Alex11223 на форуме   Ответить с цитированием
Старый 11.01.2019, 11:09   #5
iliy.marin
Новичок
 
Регистрация: 07.01.2019
Сообщений: 3
Репутация: 10
По умолчанию

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

icq: 512-765
skype: alexp.frl
По умолчанию

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

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

Ну и можно использовать несколько сервисов на случай если один упал.

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

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как исправить ошибку Unknown Source? SASFM Общие вопросы по Java, Java SE, Kotlin 5 18.06.2017 13:24
Вакансии REG.RU: программист Perl и ведущий разработчик (Perl) REG.RU Работа на постоянной основе - Вакансии 0 20.12.2011 19:57
Python vs Perl, Я выбрал Perl! Причина: а черт ее знает но наверное дело в философии и синтаксисе(TMTOWTDI ) Sna1L Perl 0 13.12.2011 14:10
Требуется web-программист (perl или php, готовый переучиться на perl). офис в Казани uCoz Работа на постоянной основе - Вакансии 0 20.01.2011 19:03


17:36.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru