Перейти к основному содержанию

Новости

Тема: Perl 6 sha1 (Прочитано 251 раз) предыдущая тема - следующая тема

  • inter 😎
  • [*][*][*][*][*]
  • Царь
Perl 6 sha1
# https://github.com/grondilu/libdigest-perl6
# panda update
# panda install Digest::SHA
use Digest::SHA;

# https://docs.perl6.org/type/Blob#method_unpack
use experimental :pack;

# sha1 string
say 'sha1 ', sha1('I love Perl 6!').unpack('H*');

# or sha1 binary
say 'sha1 ', sha1('I love Perl 6!'.encode).unpack('H*');