$ perl -pi -e'tr/\015//d' *.{pl,pm,pod,txt}