I agree that this is a nice function, but it only works with this correction:

Instead of

While @wordcount 0

there should be

WHILE @wordcount < @numberOfWords AND len(@stringToSplit) >...