【发布时间】:2010-09-29 13:20:50
【问题描述】:
我尝试过的任何方法都无法让我的代码正确提交。其他人可以解决这个问题吗?
#!/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;
【问题讨论】:
-
您的代码对我有用。你有什么问题?
-
有没有机会,IP被列入黑名单/禁止?
-
正在发生什么,与您预期会发生什么?您没有明确说明您遇到的实际问题。
-
问题是,一旦我进入评论之前的页面,我就不知如何提交该表单。我尝试代替该评论的各种方法都失败了。已经存在的代码可以工作,是的,但是我在编写更多工作代码时遇到了麻烦。谢谢。
标签: perl forms paypal www-mechanize