Перемешать символы в каждой строке
Есть текстовый файл, в котором каждая строка это цифра, например 123456789, мне нужно каждую строку файла перемешать, что бы получилось к примеру 978654123. Может быть есть какой нибудь простой способ это сделать, например команда однострочник на perl?
Ответы (1 шт):
Автор решения: Кирилл Новгородцев
→ Ссылка
cat test.txt | perl -MList::Util=shuffle -lnE 'say shuffle split("");'
Если кратко, то мы передаем в пайп содержимое файла test.txt и дальше обрабатываем его построчно (-n), с удалением переносов строк (-l).
В коде разбиваем строку на символы и перемешиваем из. Правда, придётся подключить модуль List::Util, он идет в поставку Perl.