perl - Blowfish.pm のエラー - 入力は 8 バイト長でなければなりません

Question

Perl のモジュールを使用してプレーン テキストを暗号化しようとしていますCrypt::Blowfish。

私のコードは

#!/usr/bin/perl
use Crypt::Blowfish;
my $key = pack("H16", "0123456789ABCDEF");
my $cipher = Crypt::Blowfish->new($key);
my $cipher_text = $cipher->encrypt($plain_text);

しかし、「入力は Crypt/Blowfish.pm で 8 バイト長でなければなりません」というエラーが返されます。

誰かが私にこれを説明できますか?

Answer 1

Blowfish は、同様の暗号化アルゴリズムと同様に、バイトではなくブロックを暗号化します。パディングを提供するには、Crypt::CBCのようなものを使用する必要があります。

Crypt::CBC は他にも 2 つの非常に重要な機能を提供します: ソルティングとチェーンです。これらがないと、暗号化は著しく弱体化します。