perl -i.bak -pe "s/\r//g" datei.pl