perl cgi 怎麼把 password 轉為加密的 md5sum

panafrio

perl cgi  怎麼把 password  轉為加密的 md5sum

libinary

新帆上找到的，我也没试过
# Functional style
use Digest::MD5  qw(md5 md5_hex md5_base64);
$digest = md5($data);
$digest = md5_hex($data);
$digest = md5_base64($data);
# OO style
use Digest::MD5;
$ctx = Digest::MD5->new;
$ctx->add($data);
$ctx->addfile(*FILE);
$digest = $ctx->digest;
$digest = $ctx->hexdigest;
$digest = $ctx->b64digest;