za pomocą Perla:
perl -pe 'tr/a-zA-Z/n-za-mN-ZA-M/'
lub w systemach uniksowych poleceniem tr:
tr A-Za-z N-ZA-Mn-za-m
W PHP została stworzona do tego celu funkcja str_rot13:
<?php echo str_rot13('Tekst do zakodowania'); ?>
Zaimplementowanie natomiast tego w C++ w postaci programu "jednolinijkowego" wygląda tak:
while(a=~getchar())putchar(~a-1/(~(a|32)/13*2-11)*13); // Zmienna a musi być uprzednio zdefiniowana
rot13 w postaci funkcji w C: void rot13(char *a) { for (; *a; *a = (*a - 1 / (~(~(*a) | 32) / 13 * 2 - 11) * 13), a++); }
Przykład Przykładowy tekst: To zdanie jest zakodowane. po zakodowaniu rot13 wygląda następująco: Gb mqnavr wrfg mnxbqbjnar.
Ograniczenia Dla niektórych wyrażeń kodowanie ROT13 nie spełnia swojego zadania, ponieważ zakodowane słowa przybierają formę innych słów w tekście oryginalnym (niezakodowanym). W skrajnym przypadku może dojść jedynie do zamiany słów miejscami. Przykładowo w języku polskim tekst "ten hejnal urwany gra" po zakodowaniu ma postać "gra urwany hejnal ten".
Zobacz też ROT47
Kategoria:Szyfry klasyczne