Perl LWP不起作用

Question

我在Windows 7 Pro上将Padre用作草莓Perl的IDE。

我正在尝试创建一个Perl脚本，该脚本将转到网站上的文本文件，然后读取/复制该文本文件。

但是即使有史以来最简单的LWP命令，我也无法使LWP工作。

#!/usr/bin/perl
   use strict;
   use warnings;
   use LWP::Simple;

   getprint('http://www.perlmeme.org') or die 'Unable to get page';

   exit 0;

我不断收到此错误消息：500无法连接到proxy.sn.no:8001（错误的主机名），例如500无法连接至（错误的主机名） http://www.perlmeme.org

我一直在搜索，使用Microsoft Fixit重置端口，等等，但是我仍然无法使其正常工作。 http // www.justskins.com / forums / lwp-connect-failing-bad-119421.html

有人可以帮我从这里出去吗？ 被困了很多小时:(

编辑：

-1 foreach我的$ key（键％ENV）{如果$ key =〜m / proxy / i，则打印“ $ key：$ ENV {$ key} \\ n”； }

是的，它同时打印出FTP_PROXY和HTTP_PROXY，并都显示以下内容： http ://proxy.sn.no:8001/

那就是我从此帮助线程获得的代理。 如何安装模块？ 草莓Perl问题

我遇到了代理问题，然后尝试从该线程进行配置，然后代理问题仍然存在。

--2我不希望在我端使用任何代理或任何东西。 只需将perl脚本连接到网站即可检索文本文档。

--3 ping的损失为0％。 （我只能在此帖子中发布两个超链接）

--4我正在使用Windows。

Answer 1

LWP将遵守http_proxy环境变量，并尝试将其用作HTTP代理。 与环境核对env | grep http_proxy Unix上的env | grep http_proxy 。