if ($guess eq $correct[$i])