LWP :: UserAgentでIPアドレスを設定する

Question

lwp :: useragentでIPアドレスを設定しようとしているので、次のように試しました。しかし、次のエラーをスローする

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 ::プロトコル:: HTTPS ::ソケット：バインド：要求されたアドレスを割り当てることができません...コードが実行されているマシンのIPアドレスにする必要がありlocal_address

。これが当てはまらない場合、つまりローカルアドレスの代わりに外部IPアドレス（ターゲットIPアドレスなど）を使用する場合は、このエラーメッセージが表示されます。