История изменений

Исправление perl5_guy, 03.11.21 16:34 (текущая версия) :

perl -pE's/(.*)\K\W+(?>\1)//' -COD vhod.txt > vyhod.txt

Исправление perl5_guy, 03.11.21 16:30:

perl -pE's/(\w*)\K\W+(?>\1)//' -COD vhod.txt > vyhod.txt

Исходная версия perl5_guy, 03.11.21 16:18:

perl -F'(\w*)\W+(?>\1)' -COD -E'say @F' vhod.txt > vyhod.txt