Select Code to Download

use strict;
use Digest::MD5;
...

print $digest, "\n";
print "977f6d9e19594bd58e68030e029cbb3c\n";

a029d0df84eb5549c641e04a9ef389e5
977f6d9e19594bd58e68030e029cbb3c