I don't really want to load a module just to do this one-time thing.

You make this sound like breaking bricks, you're just typing 'use Crypt::PasswdMD5;'

You have several MD5 modules to choose from you can pick one that is easy and fast to use. The time you invest in looking for a module will most likely save you ten-fold in development, and prevent you from making a serious mistake