$ perl -le'
$_ = "The quick brown fox jumped over the lazy dog";
print;
s/[[:alpha:]]+(?=[[:alpha:]]{3})//g;
print;
'
The quick brown fox jumped over the lazy dog
The ick own fox ped ver the azy dog
[download]