How to remove Ctrl^M from end of line in text file.

cat filename | perl -pe 's/\015\012/\n/g' > new_file_with_no_ctrl_m