2

我在 perl 中编写了以下脚本以使用代理连接到网站。假设代理地址此时可能无法正常工作，但前提是代理地址没有问题，代码可以正常工作。

我想知道如何将它扩展到一个有 cookie 并且我必须提供登录名的网站。也就是说，在代码中，我想使用：$mech->submit_form()。我的问题不是如何为 cookie 和登录编写 $mech 内容（我已经成功地做到了），而是如何通过代理地址来做到这一点。我问，部分原因是我什至不确定如何在网络浏览器中执行此操作。

 #!/usr/bin/perl

 use strict;
 use warnings;
 use utf8;
 use WWW::Mechanize;
 use WWW::Mechanize::Link;
 use LWP::UserAgent;
 use Data::Dumper;

 BEGIN { $| = 1 }
 $ENV{'HTTP_PROXY'} = 'http://66.35.68.145:7808';
 $ENV{'HTTPS_PROXY'} = 'http://66.35.68.145:7808';

my $mech = WWW::Mechanize->new();
my $response = $mech->get("http://whatismyipaddress.com/");
print Dumper($response->decoded_content);
4

1 回答 1

0

你总是可以尝试使用WWW::Curl

于 2013-11-22T14:56:30.030 回答