1
Perl / Заменить каждый байт в файле
« : 04 Ноября 2009, 12:44:45 »
Имею текстовый файл, заранее не знаю в какой системе он сделал(МакОс/*НИКС/Вин), необходимо заменить все символы, исключая * на символ =
на линухе 0D 0A заменяются на ==, а на винде только =, должна быть опция заставить перл обрабатывать файл в бинарном режиме.
Спасибо.
Код: [Выделить]
perl -pe "s/[^*]/=/g" file
на линухе 0D 0A заменяются на ==, а на винде только =, должна быть опция заставить перл обрабатывать файл в бинарном режиме.
Спасибо.