$in =~ s/\s+/\n/g; $in =~ s/[a-zA-Z]\n[a-zA-Z]/$1\ $2/g;