while (<FILE>){
    s/\r$//;
    print DST $_;
}

##</code><code>##

while (<FILE>){
    s/\r//g;
    print DST $_;
}