Программирование > Perl

Заменить каждый байт в файле

(1/1)

vladsu:
Имею текстовый файл, заранее не знаю в какой системе он сделал(МакОс/*НИКС/Вин), необходимо заменить все символы, исключая * на символ =


--- Код: ---perl -pe "s/[^*]/=/g" file
--- Конец кода ---


на линухе 0D 0A заменяются на ==, а на винде только =, должна быть опция заставить перл обрабатывать файл в бинарном режиме.

Спасибо.

Навигация

[0] Главная страница сообщений