正規表現

[0905 名無しさん＠お腹いっぱい。 2015/01/16(金) 17:48:43.41]

|tac|sed -n '/./,/.\n/p'|tac|sed -n '/./,/.\n/p'
これは標準入力の中の上下の無駄な改行を全て削除します
perlの正規表現でやるならどう書けばよろしいでしょうか?