if($inputfield =~ /(F|f)ieldname/) { print "matched Fieldname regex\n"; if($inputfield->type=="option") { $mech->select($inputfield=>$desired_input); } else { $mech->set_fields($inputfield=>$desired_input); }