Perl で ハッシュ値を生成する

Perlの標準モジュールには、ハッシュ値を生成するモジュールは存在しないので、CPAN(Comprehensive Perl Archive Network)からハッシュ値を生成するモジュールをインストールします。

尚、Windows版のPerlである、Strawberry Perl for Windows では、Strawberry Perl for Windowsをインストールした時にハッシュ値を生成するモジュールもインストールされているため、追加でインストールする必要はありません。

SHA系ハッシュアルゴリズムのモジュールのインストール (Linux系)

Digest::SHAモジュールには、SHA系ハッシュアルゴリズムを生成する関数が提供されています。

以下のコマンドでDigest::SHAモジュールをインストールします。

# sudo cpan Digest::SHA

SHA1, SHA256アルゴリズムでハッシュ値を生成し、出力するプログラムです。

use Digest::SHA qw(sha1 sha1_hex sha1_base64);
use Digest::SHA qw(sha256 sha256_hex sha256_base64);

my $digest1 = sha1_hex('Hello World');
my $digest2 = sha256_hex('Hello World');

print "SHA1\n";
print $digest1;
print "\n";
print "SHA256\n";
print $digest2;
print "\n";

参考情報