perl -pi -e'tr{\r}{}d' filename.txt