while (length($target_letters) != WORD_LENGTH ||
    $target_letters !~ /[^A-Za-z]/) {
    # prompt
}
process the word