next if($at == $at2); # skip identical item, but not homophones $at2++;