perl -pi.bak -e 's/\r//g' your_script