$new_file =~ tr/\r//d;