Using regexp_replace to remove small words

Hi,

I'm trying to find a regular expression that removes all small (length < N)
words from a string. But, until now I've not been successful.

For example:

If I pass 'George W Bush' as parameter, I want regexp_replace to return
'George Bush'.

Other examples are:

select regexp_replace( 'Tommy Lee Jones', 'REGEX', ' ', 'g' ) => 'Tommy
Jones'

select regexp_replace( 'Dr Tommy Lee Jones', 'REGEX', ' ', 'g' ) => 'Tommy
Jones'

select regexp_replace( 'Tommy Lee Jones Jr', 'REGEX', ' ', 'g' ) => 'Tommy
Jones'

Thanks in advance,

HENRIQUE TRINDADE

ANALISTA DE SISTEMA II

( 55 (31) 3025-3550

+henrique(at)vivver(dot)com(dot)br

assinatura