1

サイト スクレイピング アプリケーションに Perl で WWW::Mechanize を使用しました。

WWW::Mechanize 経由で特定のサイトにログインしようとすると、いくつかの問題に直面しました。WWW::Mechanize の例をいくつか見てきました。しかし、私は自分の問題を見つけることができませんでした。私は自分のコードの下に言及しています。

#!/usr/bin/perl -w

use strict;
use WWW::Mechanize;
use HTTP::Cookies;
use Crypt::SSLeay;
my $agent = WWW::Mechanize->new(noproxy => 0);
$agent->cookie_jar(HTTP::Cookies->new());
$agent->agent('Mozilla/5.0');
$agent->proxy(['https', 'http', 'ftp'], 'http://proxy.rcapl.com:3128');
$agent->get("http://www.facebook.com");
my $re=$agent->submit_form(
        form_number => 1,
        fields      => {
            Email    => 'xyz@gmail.com',
            Passwd  =>'xyz'
        }
    );
print $re->content();

コードを実行すると、次のように表示されます。

エラー投稿https://www.facebook.com/login.php?login_attempt=1 : ./test.pl 行 11 で実装されていません

コードで何が問題になっているのか誰にもわかりますか。Facebookがログインのために送信するすべてのパラメータを設定する必要がありますか?.

4

1 に答える 1

1

プロキシに問題があります:

Error GETing http://www.facebook.com: Can't connect to proxy.rcapl.com:3128 (Bad hostname) at so11406791.pl line 11.

プログラムは、プロキシ メソッドを呼び出さずに動作します。これを削除します。

于 2012-07-10T11:51:43.617 に答える