Crypt::CBC

最終更新日時:2010-03-29 00:00:00
Perl

概要


Crypt::CBCは文字列を暗号化するモジュールです。
実際のアルゴリズムは外部モジュールから呼び出すことで暗号化しますので、様々な暗号化アルゴリズムに対応可能です。

インストール方法


CPANで普通にインストールできます。
ただし、暗号化アルゴリズム用のモジュールを別途インストールする必要があります。

使用方法


以下使用例です。
暗号化アルゴリズムは最近よく使われる、Blowfishを用いています。

 use Crypt::CBC;
 
 my $key = "testkey";
 my $cbc = Crypt::CBC->new({'key' => $key,
                            'cipher' => 'Blowfish',
 });
 my $fdata = "テストテスト";
 my $ciphertext = $cbc->encrypt_hex($fdata);
 print "[$ciphertext]\n";
 my $plaintext  = $cbc->decrypt_hex($ciphertext);
 print "[$plaintext]\n";


new時の引数のkeyで暗号化/複合化する際のキーを指定します。
同様にcipherで暗号化アルゴリズムのモジュールを指定します。
上記ではBlowfishを使っているのでCrypt::Blowfishをインストールしておく必要があります。

その他


Crypt::CBCではハッシュ/配列/オブジェクト等のデータは暗号化できません。
従って、これらのデータを暗号化する際には、まずはデータをシリアライズした後に暗号化する必要があり、逆に複合化する際には、復号後にシリアライズされたデータを復元する必要があります。
具体的な例は、Storableを参照してください。

お問い合わせは 掲示板 にて。