[1] [[C]]:

[PRE[
 rotate13(c)
 char c;
 {
 if ((c >='a')&&(c <='m')) return (c+13);
 if ((c >='n')&&(c <='z')) return (c-13);
 if ((c >='A')&&(c <='M')) return (c+13);
 if ((c >='N')&&(c <='Z')) return (c-13);
 return c;
 }
]PRE]

[2] [[Perl]]:

[PRE[
 $c =~ tr/A-Za-z/N-ZA-Mn-za-m/;
]PRE]


* 実装

[3] [[電子メイル]]のソフトウェアで実装してるのが、特に洋物で結構あるみたい。
[[Un*x]] では /usr/lib/news/caesar で解読出来たりするらし。

[4] [[MIME]] みたいな媒体型文脈ではどー書くのか例を見ないけど、
(そもそも[[簡易暗号化]]の目的からすると、機械処理ではなく手動で解読だよねー。でも指定があれば半自動に出来るか。)
[DEL[

[[ROT13/47]] の説明にならって、

> Content-Type: text/plain; x-rot="13"

てことでどう?

[5] 冗長だけど、
]DEL]

> Content-Type: text/plain; x-rot="rot13"

にしようか。 (See [[x-rotパラメーター]])


* See also

- jargon file より ROT13 <http://www.tuxedo.org/~esr/jargon/html/entry/rot13.html>