すいません　Perlなんですが、
3文字以内の行（を改行のみに置換）
ってどう書いたらいいでしょうか？