[#] [Перевод] Транслитерация в Perl6
habrabot(difrex,1) — All
2015-04-30 15:30:02


«Транслитерация» означает замену символов. Именно этим и занимается метод Str.trans

say "GATTACA".trans( "TCAG" => "0123" ); # выводит "3200212\n"


Люди, знакомые с Perl 5 или с оболочкой Unix распознают в этом tr/tcag/0123/, а для остальных поясним: каждая буква T заменяется на 0, каждая C на 1, и так далее. Две строки, TCAG и 0123, предоставляют алфавиты, которые надо взаимозаменять. Это можно использовать для скорости при реализации разных операций. Например, простая функция, «шифрующая» текст методом [ROT-13 ][1](замена символа тем, что стоит через 13 позиций от него): [Читать дальше →][2]

[1]: http://en.wikipedia.org/wiki/ROT13
[2]: http://habrahabr.ru/post/257021/#habracut