改行を削るとなると1行でズバッとは難しいが、
たぶんループするよりは

{
　local($/);
$data = <FILE>;
}
$data =~ s/\n//gs;

の方が速いだろう。15KB,200行ぐらいのファイルで
試したけど3割ぐらい短い時間で終わったよ。