ktats****@users*****
ktats****@users*****
2009年 12月 7日 (月) 00:33:35 JST
Index: docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Military.pod diff -u docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Military.pod:1.1 docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Military.pod:1.2 --- docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Military.pod:1.1 Mon May 26 07:40:44 2003 +++ docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Military.pod Mon Dec 7 00:33:35 2009 @@ -1,73 +1,73 @@ -=head1 ¼O +=head1 名前 -Crypt::OOEnigma::Military - 1940N²ëÌRpGjO}B¤pGjO}ÆÍ[^[ -ÌOÉvO{[hªÇÁ³ê¦Ä¢é_ÅÙÈèÜ·B +Crypt::OOEnigma::Military - 1940年ごろの軍用エニグマ。商用エニグマとはローター +の前にプラグボードが追加されえている点で異なります。 -=head1 Tv +=head1 概要 use Crypt::OOEnigma::Military; - # (¢Â௶u·ð·é)3ÂÌftHgÌ[^[ðÂGjO} + # (いつも同じ置換をする)3つのデフォルトのローターを持つエニグマ my $enigma = new Crypt::OOEnigma::Military; - # é¢Í + # あるいは use Crypt::OOEnigma::Military; use Crypt::OOEnigma::Rotor; my @rotors = () - # Crypt::OOEnigma::RotorÌXgðüêé + # Crypt::OOEnigma::Rotorのリストを入れる Crypt::OOEnigma::Military->new( rotors => [@rotors] ); - # é¢Í + # あるいは use Crypt::OOEnigma::Military; use Crypt::OOEnigma::Rotor; use Crypt::OOEnigma::Reflector; use Crypt::OOEnigma::Plugboard; my @rotors = () - # Crypt::OOEnigma::RotorÌXgðüêéBηéPODðQÆ - my $reflector = new Crypt:OOEnigma::Reflector(params); # ηéPODðQÆ - my $plugboard = new Crypt:OOEnigma::Plugboard(params); # ηéPODðQÆ + # Crypt::OOEnigma::Rotorのリストを入れる。対応するPODを参照 + my $reflector = new Crypt:OOEnigma::Reflector(params); # 対応するPODを参照 + my $plugboard = new Crypt:OOEnigma::Plugboard(params); # 対応するPODを参照 Crypt::OOEnigma::Military->new( rotors => [@rotors], plugboard => $plugboard, reflector => $reflector); my $cipher = $enigma->encipher($mesg); - my $decode = $enigma->encipher($cipher); # ©ªÅtûü + my $decode = $enigma->encipher($cipher); # 自分で逆方向 - # àIÉp·é½ß + # 内部的に利用するため - $enigma->init(); # [^[Æ»êçÌúóÔðԵܷ + $enigma->init(); # ローターとそれらの初期状態を返します -=head1 ྠ+=head1 説明 -±ÌW [ÍPlugboardªRotorÌOÉÇÁ³êÄ¢éÆ¢¤_ÅÙÈé -RpGjO}E}VðñµÜ·B +このモジュールはPlugboardがRotorの前に追加されているという点で異なる +軍用エニグマ・マシンを提供します。 -ÊíÍÆ©ÌPlugboardARotors »µÄ ReflectorÅRpGjO}ðìé -׫ŷB +通常は独自のPlugboard、Rotors そして Reflectorで軍用エニグマを作る +べきです。 -=head1 Ó +=head1 注意 -½à èܹñ +何もありません -=head1 oOÆx +=head1 バグと警告 -=head2 GjO}ÍÆãÅ·! +=head2 エニグマは脆弱です! -ÃÌêåÆÍRs [^IÉâÔêâ·¢©Ç¤©Æ¢¤Ê©ç -ÃASY̳ðêèÜ·Bà¿ëñGjO}ÃÍRs [^IÉÍ -âÔçêâ·¢àÌÅ·B»Ì½ßdvÈàÌÉÍgíȢž³¢I +暗号の専門家はコンピュータ的にやぶれやすいかどうかという面から +暗号アルゴリズムの強さを語ります。もちろんエニグマ暗号はコンピュータ的には +やぶられやすいものです。そのため重要なものには使わないでください! -=head1 ðj +=head1 歴史 -±ÌpbP[WÍOO PerlÆCPAN̽ßÌKØÈõÌûK̽ßA2002NÌtÉ -쬳êܵ½B³çÉdvȱÆÍEnigmaªÊ¢±ÆÅ·B +このパッケージはOO PerlとCPANのための適切な準備の練習のため、2002年の春に +作成されました。さらに重要なことはEnigmaが面白いことです。 -CPANÉÍIuWFNgwüÅÍÈA1ÂÌEnigma¾¯ðÀµÄ¢é -Crypt::EnigmaªùÉ èܵ½Bi±êÉεıêçÌIuWFNgÅGjO}ɽ -@Bðìé±ÆªÅ«Ü·jB»Ì½ß±ÌpbP[WðCrypt::OOEnigmaÆ -¼t¯Üµ½B +CPANにはオブジェクト指向ではなく、1つのEnigmaだけを実装している +Crypt::Enigmaが既にありました。(これに対してこれらのオブジェクトでエニグマに似た +機械を作ることができます)。そのためこのパッケージをCrypt::OOEnigmaと +名付けました。 -=head1 Ql¿ +=head1 参考資料 The Pleasures of Counting, T W Korner, CUP 1996. A great book for anyone with the slightest interest in mathematics @@ -76,15 +76,15 @@ Crypt::OOEnigma::Military -R|[lg +コンポーネント Crypt::OOEnigma::Rotor Crypt::OOEnigma::Reflector Crypt::OOEnigma::Plugboard -=head1 ì (=COPYRIGHT) +=head1 著作権(=COPYRIGHT) This package is licenced under the same terms as Perl itself. -=head1 |óÒ +=head1 翻訳者 -ìFT (GCD00****@nifty*****) +川合孝典 (GCD00****@nifty*****) Index: docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Reflector.pod diff -u docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Reflector.pod:1.1 docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Reflector.pod:1.2 --- docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Reflector.pod:1.1 Mon May 26 07:40:44 2003 +++ docs/modules/Crypt-OOEnigma-0.3/OOEnigma/Reflector.pod Mon Dec 7 00:33:35 2009 @@ -1,51 +1,51 @@ -=head1 ¼O +=head1 名前 -Crypt::OOEnigma::Reflector - Crypt::OOEnigmaÅg¤½ßÌReflectorIuWFNg +Crypt::OOEnigma::Reflector - Crypt::OOEnigmaで使うためのReflectorオブジェクト -=head1 Tv +=head1 概要 my $reflector = Crypt::OOEnigma::Reflector->new(); - # é¢Í + # あるいは - my $subHash ={ # V[gÌÈ¢©È½]à + my $subHash ={ # ショートのない自己反転暗号 A => "Z", B => "G", - # ÈÇ + # など }; my $reflector = Crypt::OOEnigma::Reflector->new(cipher => $subHash); - # Enigma}VÅÌàpÌ½ß + # Enigmaマシンでの内部利用のため my $reflected_letter = $reflector->reflect($some_letter); -=head1 ྠ+=head1 説明 -±êÍCrypt::OOEnigmaÅgíêéReflectorÅ·BÁèÌvpeBðÁ½ -Æ©ÌGjO}ðì轢ƫÉA¨g¢¾³¢B +これはCrypt::OOEnigmaで使われるReflectorです。特定のプロパティを持った +独自のエニグマを作りたいときに、お使いください。 -=head1 Ó +=head1 注意 -½à èܹñ +何もありません -=head1 oOÆx +=head1 バグと警告 -=head2 GjO}ÍÆãÅ·! +=head2 エニグマは脆弱です! -ÃÌêåÆÍRs [^IÉâÔêâ·¢©Ç¤©Æ¢¤Ê©ç -ÃASY̳ðêèÜ·Bà¿ëñGjO}ÃÍRs [^IÉÍ -âÔçêâ·¢àÌÅ·B»Ì½ßdvÈàÌÉÍgíȢž³¢I +暗号の専門家はコンピュータ的にやぶれやすいかどうかという面から +暗号アルゴリズムの強さを語ります。もちろんエニグマ暗号はコンピュータ的には +やぶられやすいものです。そのため重要なものには使わないでください! -=head1 ðj +=head1 歴史 -±ÌpbP[WÍOO PerlÆCPAN̽ßÌKØÈõÌûK̽ßA2002NÌtÉ -쬳êܵ½B³çÉdvȱÆÍEnigmaªÊ¢±ÆÅ·B +このパッケージはOO PerlとCPANのための適切な準備の練習のため、2002年の春に +作成されました。さらに重要なことはEnigmaが面白いことです。 -CPANÉÍIuWFNgwüÅÍÈA1ÂÌEnigma¾¯ðÀµÄ¢é -Crypt::EnigmaªùÉ èܵ½Bi±êÉεıêçÌIuWFNgÅGjO}ɽ -@Bðìé±ÆªÅ«Ü·jB»Ì½ß±ÌpbP[WðCrypt::OOEnigmaÆ -¼t¯Üµ½B +CPANにはオブジェクト指向ではなく、1つのEnigmaだけを実装している +Crypt::Enigmaが既にありました。(これに対してこれらのオブジェクトでエニグマに似た +機械を作ることができます)。そのためこのパッケージをCrypt::OOEnigmaと +名付けました。 -=head1 Ql¿ +=head1 参考資料 The Pleasures of Counting, T W Korner, CUP 1996. A great book for anyone with the slightest interest in mathematics @@ -54,15 +54,15 @@ Crypt::OOEnigma::Military -R|[lg +コンポーネント Crypt::OOEnigma::Rotor Crypt::OOEnigma::Reflector Crypt::OOEnigma::Plugboard -=head1 ì (=COPYRIGHT) +=head1 著作権(=COPYRIGHT) This package is licenced under the same terms as Perl itself. -=head1 |óÒ +=head1 翻訳者 -ìFT (GCD00****@nifty*****) +川合孝典 (GCD00****@nifty*****)