Remove short words from string 1

[madanthrax]

Hi,

Is there an elegant way of removing all words from a text string that are less than 4 characters in length please? This is search related.

_{"Nothing is impossible until proven otherwise"}​

 

[tsuji]

Elegant?! Don't know what it means.
[tt]
set rx=new regexp
with rx
.global=true
.multiline=false
.pattern="(\s*\b\w{1,4}\b\s*)+"
'or effectively accepting only collapsing white space as well
'.pattern="(\s*\b\w{0,4}\b\s*)+"
end with
[green]'s be the string given
't be the processed string[/green]
t=rx.replace(s," ")
[/tt]

 

[madanthrax]

Excellent, works like a charm. Many thanks.

_{"Nothing is impossible until proven otherwise"}​