PerlWWW::Mechanize:如何独立于URL指定目标IP地址?
我想使用 Perl www::mechanize 连接到网络服务器并请求资源。例如http://www.my.domain/test.html。但我想独立于 URL 中的主机名指定 IP 地址。
例如:www.my.domain解析为 1.1.1.1,但我想连接到 2.2.2.2。
我想这样做是为了测试负载均衡器后面的多个 Web 服务器。
回答
使用LWP::UserAgent::DNS::Hosts;
它适用于 WWW::Mechanize。
use LWP::UserAgent::DNS::Hosts;
use WWW::Mechanize;
LWP::UserAgent::DNS::Hosts->register_host('www.my.domain' => '2.2.2.2');
LWP::UserAgent::DNS::Hosts->enable_override;
my $mech = WWW::Mechanize->new;
$mech->get('http://www.my.domain/test.html'); # connects to 2.2.2.2