文章の１行目から３行目までを指定して
改行を取り除きたいのですが、
どのようにすればいいのでしょうか？
改行を取り除くのは
$body =~ s/\n//g;
これでできるのですが、
$bodyの中の１行目から３行目までだけの
改行を取り除きたいと思っています。