-1

私が試したことはありませんが、コードを正しく送信することはできません。他の誰かがこれを理解できますか?

#!/usr/bin/perl

use WWW::Mechanize;


my $user = 'cowsaremyfriends@gmail.com';
my $pass  = 'hackswipe';
# Test account; don't worry


my $browser = WWW::Mechanize->new();
$browser->get("https://www.paypal.com/");
$browser->form_with_fields("login_email", "login_password");
$browser->field("login_email", $user);
$browser->field("login_password", $pass);
$browser->submit_form();
$browser->get("https://www.paypal.com/us/cgi-bin/webscr?cmd=_profile-api-add-direct-access");
##### Help here ---> Trying to submit form with default option selected #####
my $html = $browser->content;

print $html;
4

2 に答える 2

6

私にとってはうまくいきますが、Web スクレイパーなどのデバッグに関しては、HTTP トランザクションを監視する必要があります。WWW::MechanizeLWP::UserAgentサブクラスであるため、追加するのは非常に簡単です。

use WWW::Mechanize;

my $browser = WWW::Mechanize->new();

# See LWP::Debug
$browser->add_handler("request_send",  sub { shift->dump; return });
$browser->add_handler("response_done", sub { shift->dump; return });

これで、送信したものと PayPal が返信したものを確認できます。

多くの場合、さまざまな HTTP スニッフィング ツールを使用することもできますが、それらはプレーンテキストで送信するものに対してのみ機能するため、ここではうまくいきません。

ただし、この場合、PayPal はあなた次第です。彼らはあなたがスクリプトを使用していることを知っています。私が得る出力の一部は次のとおりです。

<h2>Request API Credentials</h2>
</div>
<div id="messageBox"></div>
<div id="main"><div class="layout1"><form action="https://www.paypal.com/us/cgi-bin/webscr?dispatch=5885d80a13c0db1f8e263663d3faee8dc18bca4c6f47e633b393e284a5f8a8f8" class="">
<input type="hidden" name="cmd" value="_profile-api-add-direct-access"><input type="hidden" name="api_flow_origin" value=""><input type="hidden" name="show_switch" value="1"><input type="hidden" name="auth_type" value="ssl"><input type="hidden" name="api_username" value=""><input type="hidden" name="program_name" value=""><input type="hidden" name="program_id" value=""><input type="hidden" name="partner_name" value=""><input type="hidden" name="partner_id" value=""><input type="hidden" name="partner_code" value=""><p>API credentials consist of three elements:</p>
<ul>
<li>An API username</li>
<li>An API password</li>
<li>Either an API signature or an API SSL client-side certificate</li>
</ul>
<p>If you’re using a shopping cart or solution provider, ask whether you need an API signature or a certificate.</p>

プログラムを通じて PayPal とやり取りしたい場合は、開発者アクセスにサインアップする必要があります。

于 2010-09-29T17:44:26.697 に答える
0

何が問題なのか正確にはわかりません。FAQを読みましたか?

perldoc WWW::Mechanize::FAQ

Mech の問題をデバッグする方法についての提案を提供します。最初に質問する必要があるのは、フォームが JavaScript を使用しているかどうかです。私は PayPal のページがそうしていることに賭けるだろう。

于 2010-09-29T17:42:27.900 に答える