Count words in a sentence

Could we get a simple tc() code that can count how many words are in a custom text, please?

Like $tc(words, "Some Text")$ would output 2.