RosettaCodeData/Task/MD5/Perl-6/md5.pl6

use Digest::MD5;
say Digest::MD5.md5_hex: "The quick brown fox jumped over the lazy dog's back";