使用WWW :: Mechanize perl填充没有名称的文本字段

时间:2014-09-18 21:32:53

标签: perl www-mechanize

我在HTML中有这样的文本字段

<input class="whatever" placeholder="Username">

我想用Mechanize Perl填充它。当name属性存在时,我可以填写它。我试过

use strict;
use warnings;

use WWW::Mechanize;

my $url = 'http://urltoscrap';
my $mech = WWW::Mechanize->new( agent => 'Windows IE 8' );
$mech->get($url);
my $result = $mech->submit_form(
    form_name => 'pf',
    fields    => {
        Username => 'value',
    },
);
print $result->content();

它不起作用我应该代替&#34;用户名&#34;使它工作?

1 个答案:

答案 0 :(得分:0)

我确定某些 JavaScript 代码会处理此输入并进行正确的HTTP POST / GET。所以你只需要找到正确的请求(可能是 Firefox HTTPFox / Firebug 扩展名)并使用{{1}创建相同的请求}