$mech->submit_form( form_number => 1, fields => { 'ctl00$ctl00$cphVeriCentre$cphLogin$txtUser' => 'someone', 'ctl00$ctl00$cphVeriCentre$cphLogin$txtPW' => 'pass', 'ctl00$ctl00$cphVeriCentre$cphLogin$ddlServers' => 'Live', }, ); die unless ($mech->success); $mech->dump_forms();