$hoge =~ s/\r\n/<br>/g;
$hoge =~ s/\r/<br>/g;
$hoge =~ s/\n/<br>/g;

もう一つ見つけました。ほとんど同じですが。
スマートとかスマートじゃないとかあるんでしょうか。