Remove one word. keep two words

[Lombi 34]

So I have a variable like this:

 

Richard Basehart, Phyllis Kirk, Stephen Elliott, Russell Collins, Richard Hale, Charles Wagenheim, Alan Wells, Tommy Cook, William Pullen, Paul, Lee, Vaso, Kaan, Ali

 

I'd like to remove everything with one word, but keep all two+ word entries.

 

Any ideas?

 

Thanks!

[odeesuba 24]

This removes all one word except if it happens to be the last one. (Did not have time to add that, sorry)

 

set(#Temp, $replace regular expression("Richard Basehart, Phyllis Kirk, Stephen Elliott, Russell Collins, Richard Hale, Charles Wagenheim, Alan Wells, Tommy Cook, William Pullen, Paul, Lee, Vaso, Kaan, Ali", ",\\s[a-zA-Z]*(?=,)", ""), "Global")

[Lombi 34]

Thank you, odeesuba!