$res = $ldap->modify ($distinguishedName,
   replace => {userAccountControl => "514"}
};