n 行以上の空白は 1 行の空白に置換する
なんてことは filter を使ってできるでしょうか？