我正在创建一个脚本,使用mechanize模块在Perl中登录到Web表单,我收到错误:
Syntax error at /home/arty/scripts/gmail_pw_chngr.pl line 18,near “button”
Execution of /home/arty/scripts/gmail_pw_chngr.pl aborted due to compilation errors.
码
use WWW::Mechanize; my $mech = WWW::Mechanize->new(); my $url = "https://accounts.google.com/Login"; $mech->get($url); $result = $mech->submit_form( form_name => 'gaia_loginform',# Name of the form #Instead of form name you can specify #form_number => 1 fields => { Email => 'arty32l@gmail.com',# Name of the input field and value Passwd => 'password',} button => 'signIn' # Name of the submit button ); print $result->content();
解决方法
有问题的错误是按钮前缺少逗号.