Select Code to Download

Invalid rule, couldn't parse '//*[@name="date", node => $mech->current
+_form ]'

 my @date_fields =$mech->selector( './/*[@name="date"]', node => $mech
+->current_form );
# stderr: Invalid rule, couldn't parse '//*[@name="date"]' at /usr/loc
+al/share/perl/5.26.1/HTML/Selector/XPath.pm line 283.

 my @date_fields =$mech->xpath( './/*[@name="date"]', node => $mech->c
+urrent_form );

$mech->set_fields(
    date => [3, $date_value],
);