我在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;使它工作?
答案 0 :(得分:0)
我确定某些 JavaScript 代码会处理此输入并进行正确的HTTP POST / GET。所以你只需要找到正确的请求(可能是 Firefox 的 HTTPFox / Firebug 扩展名)并使用{{1}创建相同的请求}