如何获得SHA256散列在Perl

任务。 在Perl代码是可变的。 你需要计算SHA256散列值这一变量。

决定

该方案是利用Perl库 Digest::SHA. 库 Digest::SHA 附带Perl,所以如果你有Perl,这种图书馆是提供给另外安装什么都没有。

获得SHA256哈,你可以使用这个代码:

▶ Run
#!/usr/bin/perl

use Digest::SHA qw(sha256_hex);

my $var = 123;

my $sha256_hash = sha256_hex($var);

print $sha256_hash;

这一程序显示的串 'a665a45920422f9d417e4867efdc4fb8a04a1f3fff1fa07e998e86f7f7a27ae3'.

  • use Digest::SHA qw(sha256_hex); —我们连接Perl图书馆,并说,从该图书馆我们需要一个功能 sha256_hex
  • my $var = 123; —创建一个变量,并把价值123
  • my $sha256_hash = sha256_hex($var); —使用功能 sha256_hex 我们的计算SHA256散列值的变 $var 和把结果的变量 $sha256_hash
  • print $sha256_hash; —所带来的价值的变 $sha256_hash 屏幕上

如果库并不表示,我们需要一个功能 sha256_hex,只是写 use Digest::SHA;时执行程序的将是错误:

Undefined subroutine &main::sha256_hex called at script.pl line 7.

该格式的回报价值的功能 sha256_hex

功能 sha256_hex 总是返回的一串。 在这行,总是完全64符。 这条线可以 该数字从0到9和拉丁字母的情况下从 'a''f'. 其他符号,在这一行是不可能的。

功能 sha256_hex SHA256返回一串,其中包含数十六符号。

哪个版本的Perl库 Digest::SHA 立即提供

在开始的这一文本说,该图书馆 Digest::SHA 配有Perl如果你有Perl,该图书馆立即 可用。 实际上它是不是这样。 库 Digest::SHA 中首次引入了Perl版5.10. 所以如果你有Perl 版本5.8或更低,然后这个图书馆应该把此外。 但甚至更好的升级Perl到一个更近的一个。 Perl5.8发布于2002年。

其他文章