私はこれを長時間過ごしています。私はこれがシンプルであるべきだと思うが、明らかに何か根本的な誤りがある。私は読んだ: WWW-Mechanizeの/ libに/ WWW/Mechanizeの/ FAQ.pod のlibwww-perlの-5.837/libに/ LWP/UserAgent.pmPerlのメカニックとプロキシの問題
:
私はのためのCPANのドキュメントを読みましたそして、私がGoogle上で見つけることができるサンプルコードや記事のすべてのビット。
これは初めてのスタックオーバーフローのヘルプを探しています。あなたの助けを前もってありがとう。ここでは、コードは次のとおりです。
#!/usr/bin/perl
use WWW::Mechanize;
my $mech = WWW::Mechanize->new (agent => "Mozilla/5.0");
my $proxy = 'http://fetch4.me';
$mech->no_proxy('localhost');
$mech->proxy(['http', 'https', 'gopher'], $proxy) or die $!;
$mech->get('http://www.google.com');
print $mech->uri(),"\n";
print $mech->content(),"\n";
print $mech->text(),"\n";
print $mech->status(),"\n";
ここで出力されます:
http://www.google.com
<html>Apache is functioning normally</html>
Apache is functioning normally
200
私はここにアイデアを実行しています。このコードはあなたのために機能しますか?同じ結果が得られますか?どうしたの? >。 <
ありがとうございます。
my $mech = WWW::Mechanize->new (agent => "Mozilla/5.0", noproxy => 1);
助けを:
ご返信いただきありがとうございます。あなたが指摘したように私は修正を加えました。それは出力に影響を与えないようです。奇妙なことに、私が知っているドメインを代用すれば、www.google.comではなく、上手くない、あるいは良いとは限りません。同じ出力が得られます。だから、たとえ$ mech-> uri()が私が本当にプロキシから来るGoogleのコンテンツ()を取得していることを示しているようにも思えます。 – PSCO
@ PSCO:私は式からMechを取り除くことを勧めます。最初にLWP :: UserAgentだけでプロキシ処理ができるかどうかを確認してください。 – ysth
私はそのショットを与えて報告する。 – PSCO