$SomeVar =~ s{(?<!\x0D)\x0A}{\x0D\x0A}g;