use Digest::MD5 qw/md5_hex/;
print md5_hex("123456"), "\n";
__END__
e10adc3949ba59abbe56e057f20f883e