Is your problem solved? You never did show the code that solved your problem. If not, see encryption confusion, you need to get the salt values, on linux it is in /etc/shadow.

This super simple example shows the basics:

#!/usr/bin/perl
use warnings;
use strict;

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","\$1the_salt\$"), "\n";


print "SHA crypt output\n"; 
print crypt("password","\$2the_salt\$"), "\n";
[download]