perl - WWW::Mechanize 字段方法

Question

有什么区别

$mech -> field($name, $value)

和

$mech -> set_fields($name => $value)

为什么它们都存在？看起来他们每个人都将名为 $name 的字段设置为 $value。

Answer 1

$mech -> field($name, $value)

field() 一次只能设置一个名称。但是

$mech -> set_fields($name => $value, $name2 => $value2,... $nameN => $valueN)

...set_fields() 允许您同时设置多个名称。

这没什么大不了的，因为你总是可以在循环中使用第一个:

my @data = (
    first => 'A',
    last  => 'B',
    age   => 22,
    #possibly 100,000 other name/value pairs
);

my($name, $value);

while(@data) {
   ($name, $value) = splice(@data, 0, 2);
   $mech->field($name, $value); 
}

...不过写起来更方便:

$mech->set_fields(@data);