小编Sar*_*nan的帖子

我正在使用Digest :: MD5模块,并在该hexdigest中为windows和linux返回不同的值.

请帮我解决这个问题.

use Digest::MD5;
my $ctx=Digest::MD5->new();
open RD, "input.txt";
$ctx->addfile(*RD);
close RD;
print $ctx->hexdigest;

input.txt文件具有以下内容:

hello

输出:窗口

5d41402abc4b2a76b9719d911017c592

输出:Linux

af5597c29467a96523a70787c319f4db

谢谢,
Saravanan