$md5 = Digest::MD5->new;

#postgres passwords in the pg_shadow table are generated by using the plaintext password and the username
$md5->add($password . $username);

# the text 'md5' plus the previous md5 hash of the password and usename are what's stored in the pg_shadow table
print "md5" . $md5->hexdigest . "\n";