perl - 为什么我不能使用 LWP::Simple 获取维基百科页面？

Question

我正在尝试使用 LWP::Simple 获取维基百科页面，但他们不会回来。这段代码:

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

print get("http://en.wikipedia.org/wiki/Stack_overflow");

不打印任何东西。但如果我使用其他网页，请说 http://www.google.com ，它工作正常。

我应该使用其他名称来引用维基百科页面吗？

这里会发生什么？

Answer 1

显然维基百科阻止了 LWP::Simple 请求:http://www.perlmonks.org/?node_id=695886

以下工作代替:

#!/usr/bin/perl
use strict;
use LWP::UserAgent;

my $url = "http://en.wikipedia.org/wiki/Stack_overflow";

my $ua = LWP::UserAgent->new();
my $res = $ua->get($url);

print $res->content;