尝试执行脚本时,出现以下复杂错误消息:
Can't modify constant item in scalar assignment at ok.pl line 556, near "$numerocarta,"
Execution of ok.pl aborted due to compilation errors.
556行是:
'cardNum' = $numerocarta,
周围的代码是:
$agent->submit_form(
form_name => 'form.asp',
with_fields => {
'Chapter' => 'Alpha',
'FirstName' => 'First',
'LastName' => 'Last',
'cardNum' = $numerocarta,
'NAME' => 'Full name',
'STREET' => 'Street',
'City' => 'City',
'State' => 'State',
'Country' => 'Country',
'Phone' => '0625410021',
'Email' => 'email',
'Amount' => '1',
'ChapterGiftHonorNem' => 'Alpha',
}
,button => 'B1',
);
我正在使用WWW::Mechanize。
收到此消息我做错了什么?
最佳答案
你写了
'cardNum' = $numerocarta,
当你打算写的时候
'cardNum' => $numerocarta,
顺便说一句,为什么有那么多报价?
=>
在其LHS上自动对裸词加引号,因此您可以使用cardNum => $numerocarta,
关于perl - 无法在标量分配中修改常量项目,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/27631406/