Shell Programming and Scripting

grep -E "([A-Z])?( [a-z]){2,100} [.,]?"

awk '{ S=gensub(" ([a-z]) ([a-z]) ([a-z]) ", " \\1\\2\\3 ", "g", $0); print S}'

awk '
{
  while(match($0,/ [^ ] [^ ]( [^ ])+ /)>0) {
    x = substr($0, RSTART, RLENGTH)
    gsub(/ /, "", x)
    $0 = substr($0,1,RSTART) x substr($0,RSTART+RLENGTH-1)
  }
  print
}'

echo " This is a text w i t h some s p l i t e d W o r d s ." | 
sed 's/\([a-z][a-z]?*\)\( \)/\1|/g' | 
sed 's/\([a-z]\)\( \)\([a-z][a-z]\)/\1|\3/g' | 
sed 's/ //g' | 
sed 's/|/ /g'
This is a text with some splitedWords.

echo "This is a text w i t h some s p l i t e d W o r d s ." |
awk '{a[NR]=$1;b[NR]=length($1)}
 
 END{
       for(i=1;i<=NR;i++) 
       {
         if(b[i]>1) {printf a[i]" "} 
         else if (b[i]==1 && a[i]~/[aA]/ && b[i-1]>1 && b[i+1]>1) {printf a[i]" "}  
         else if (b[i]==1 && b[i-1]>1 && b[i+1]==1) {printf " "a[i]} 
         else if (b[i]==1 && b[i-1]==1 && b[i+1]>1){printf a[i]" "} 
         else {printf a[i]}
        }
      }' RS=" " |
tr -s " "
This is a text with some splitedWords.

awk '
BEGIN{
	q='"\"'\""'; 
	o=""
}
{
	for(i=1;i<=NF;i++)
	{
		f=$i;fl=length($i)
		nf=$(i+1);nfl=length($(i+1))
		if (nfl==0) {o=o f}
		else if(fl>1) {o=o f" "} 
		else if ((fl==1) && (nfl>1)) {o=o f" "}
		else if ((f~/[[:lower:]]/) && (nf~/[[:upper:]]/ || nf~/[[:digit:]]/ || nf~/[\(]/) ) {o=o f" "} 
		else if ((f~/[[:lower:]]/) && (nf~/[[:digit:]]/ ) ) {o=o f" "} 
		else if ((f~/[[:digit:]]/) && (nf~/[[:alpha:]]/)) {o=o f" "}
		else if ((f~/[[:punct:]]/) && (f!~/[\(\-]/ && f!=q && nf!~/[[:punct:]]/)) {o=o f" "}
		else {o=o f}
	} 
	o=o RS
	printf "%s", o > output.txt
	o=""
}
END{

}' input.txt