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