Perl md5

perl -MDigest::MD5 -e 'print Digest::MD5::md5_hex("mbqt")'