使用Digest :: MD5在Perl中返回错误的MD5字符串

Question

我尝试使用MD5加密此字符串：

lolno

我使用模块使用Digest :: MD5，我的输出是：

τ;å▌3Gùφ▄♥ H≤Gj╠

我知道这不是MD5所以我想问一下如何才能使这个工作？这是我使用的代码：

use Digest::MD5;
$ctx = Digest::MD5->new;
$ctx->add($pass);
$digest = $ctx->digest;
print $digest;

我也尝试过：

use Digest::MD5 qw(md5);
$test = md5($pass);
print $test;

Answer 1

尝试md5_hex（hexdigest作为第一个代码段），看看您的期望。这是一个以字符形式表示的二进制表示。