TedPride's reply is right on the money, IMO, but I'd simply delete the CR (="\r") characters, leaving every actual LF (="\n") characters intact:

$text =~ tr/\r//d;
[download]