Допустим, у нас есть файл:
OK
TOP 3
XAMOΓEΛO
SMS MEΛΩΔIA XPHΣTOΣ AΛEΞOΠOYΛOΣ
STOP ALL
Stop
Red xbox TOYMΠEKTΣHΣ ΛEYTEPHΣ
ΠAPTY
Ok
Διακοπη
MEΛΩΔIA ANNA ΠAPIΣH 15
Допустим, нам надо его считать, и все символы заменить на их числовые значения.
Однострочник:
perl -C8 -alne 'print join "-", map {ord} split //' /var/log/file
Результат:
79-75
(
Read more... )