my $oldpassword = $entries->{$dn}->{userpassword}->[0];
if ($oldpassword !~ /^{crypt}\$1\$/) {
# Update their password to md5
my $oldpassword = $entries->{$dn}->{userpassword}->[0];
if ($oldpassword !~ /^{crypt}\$1\$/) {
# Update their password to md5