You might want md5 passwords with crypt

#!/usr/bin/perl

print "Standard crypt output\n";
print crypt("password","sa"), "\n";

#glibc's implementation  that takes  care of  this.  Since  perl on 
# Linux uses glibc, you get this automagically. When the salt looks li
+ke 
# $1$...., it will encrypt the password using MD5.  e.g. 

print "MD5 crypt output\n";
print crypt("password","\$1\$thesalt\$"), "\n";
[download]