$ perl -e 'use Digest::MD5; my $x= Digest::MD5->new; $x->add("foobarbaz"); 
print $x->hexdigest,$/'
6df23dc03f9b54cc38a0fc1483df6e21