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*');