Установить IP-адрес в LWP :: UserAgent

Question

Я пытаюсь установить IP-адрес в lwp :: useragent, поэтому я попробовал следующее. Но это вызывает следующую ошибку:

Can't connect to www.some_domain.com:443 

LWP::Protocol::https::Socket: bind: Cannot assign requested address at /usr/local/share/perl/5.18.2/LWP/Protocol/http.pm line 47. 

Я не знаю, как это исправить. Мой код следующий:

use LWP::UserAgent; 
my $url = "https://www.some_domain.com"; 
my $ua = LWP::UserAgent->new(); 
$ua->local_address("152.73.205.80"); 
my $response = $ua->get($url); 
$cont = $response->content; 

print $cont; 

Как это исправить?

Answer 1

LWP :: Protocol :: HTTPS :: Socket: обязывать: Невозможно назначить запрашиваемый адрес ...

local_address потребности быть IP-адрес компьютера, на котором код работает. Если это не так, т. Е. Если вы хотите использовать какой-то внешний адрес (например, целевой IP-адрес) вместо локального адреса, вы получите именно это сообщение об ошибке.