Select Code to Download

unless (eval {$ldap->modify($dn, add => {%attrs});1})
  { $ldap->modify($dn, replace => {%attrs}) }