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