One of the web applications I maintain stores md5 hashes in the database, instead of the actual passwords. This is a good practice – passwords are not stored in plain text, and knowing the has still does not give you a direct access to the system.
I whipped up this tiny shell script in order to easily get md5 hashes of strings on the command line (for example in case I need to go in and change some password directly in the database).
use Digest::MD5 qw(md5 md5_hex md5_base64);
print(md5_hex($ARGV) . "\n")
This script takes a parameter string and prints out the md5 hash of that string to the standard output stream.
[tags]md5, pearl, hash, passwords, hashing, scripting[/tags]