通过代理下载网页

Question

我正在尝试使用以下代码通过代理连接下载网页：

use LWP::Simple qw(get);
my $url = 'https://www.random-site.com';
my $html = get $url or die "sorry, can't";

我收到明显的错误sorry, can't。

代码适用于普通连接，但在代理上它不会，甚至使用Hideman程序，它仍然不会绕过该代理。在这种情况下哪种方法更好？我使用了错误的模块吗？

Answer 1

注意LWP::Simple：

  

此模块创建的用户代理将自己标识为＆＃34; LWP :: Simple /#.##"并将从环境初始化其代理默认值（通过调用$ ua＆gt; env_proxy）。

然后，请注意env_proxy：

  

从* _proxy环境变量加载代理设置。

因此，在环境中设置HTTPS_PROXY。