perl - 这个使用 LWP::UserAgent 的 Perl 代码在做什么？

Question

我有这个代码：

use strict;
use LWP::UserAgent;
use warnings;
my $ua = new LWP::UserAgent(agent => 'Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.0.5) Gecko/20060719 Firefox/1.5.0.5');
$ua->proxy([qw(http https)] => 'http://59.39.92.148:1080');
my $response = $ua->get("http://www.google.com");
print $response->code,' ', $response->message,"\n";

代码的含义是“使用 sock 代理打开 www.google.com”吗？解释是什么？

Answer 1

它正在实例化一个LWP::UserAgent对象。

• 参数指定浏览器Mozilla Firefox

• 连接代理的地址和端口 ' http://59.39.92.148:1080 '

• 响应是谷歌通过代理传递的：

  我的 $response = $ua->get(" http://www.google.com ");`

最后：

print $response->code,' ', $response->message,"\n";`

允许回复给用户

我是一名 C# 开发人员，但在我看来就是这样 :)

Answer 2

该代码正在设置一个LWP::UserAgent对象以伪装成人类用来绕过 Google 蜘蛛检测机制的浏览器。这样做违反了Google 的服务条款：

5.3 您同意不通过谷歌提供的界面以外的任何方式访问（或试图访问）任何服务，除非您在与谷歌的单独协议中被明确允许这样做。您明确同意不通过任何自动化方式（包括使用脚本或网络爬虫）访问（或尝试访问）任何服务，并应确保您遵守服务中存在的任何 robots.txt 文件中的说明.

59.39.92.148在中国可能是一些受损（或配置错误）的开放代理。设置$ua使用它是试图隐藏违反 TOS 的根源。

顺便说一句，您应该知道，59.39.92.148如果您决定走这条路线，服务器将能够记录和跟踪您的所有请求和响应。

更重要的问题是：你想做什么？

Answer 3

看起来像：使用 HTTP 代理打开“www.google.com”