在LWP :: UserAgent中设置IP地址

我试图在lwp :: useragent中设置IP地址，所以我尝试了以下操作。但它会抛出以下错误在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;

我该如何解决它。

来源

2016-12-14 mkHun

你为什么要设置IP地址？你想做什么？ – ysth

@ysth我试图抓取网站上的内容。但是，从同一个IP打开时，该网站具有验证码。 – mkHun

LWP ::协议:: HTTPS ::插座：绑定：无法分配请求的地址...

local_address需求是在代码上运行的机器的IP地址。如果不是这种情况，即如果你想使用一些外部地址（如目标IP地址）而不是本地地址，那么你会得到这个错误信息。

来源

2016-12-14 06:05:14

在LWP :: UserAgent中设置IP地址

回答

相关问题