function deleteNetworkAddress(data)

  _, dn = nLDAP.getDN(data)
  status, nvalue = nLDAP.hasAttrValue(data, "networkAddress")
  if ( YES == status ) then
   msg1 = string.format("User (%s) has %d network address value(s):\r\n",
                        dn, nvalue)
   for i = 1, nvalue do
    -- "*networkAddress*" tells the function to return the address as one-line
    _, s1 = nLDAP.decodeB64Data_N ("*networkAddress*", data.networkaddress[i],
                                   "networkAddress")
    msg1 = msg1 .. string.format(" %s\r\n", s1)
   end

   status, errMsg = nLDAP.deleteAttribute(dn, "networkAddress")
   if ( OK == status ) then
    msg1 = msg1 .. " - networkAddress attribute deleted.\r\n"
   else
    msg1 = msg1 ..
           string.format(" - failed to delete networkAddress attribute: (%s)\r\n",
                         errMsg)
   end
  else
   msg1 = string.format("User (%s) has no network address value.\r\n", dn)
  end

  print(msg1)

 end


 bindDN = "cn=admin,o=org"
 bindPassword = "password"
 host = "10.1.1.1"

 status1, errMsg = nldap.bind(bindDN, bindPassword, host, LDAP_CLEARTEXT_PORT, NO_TLS) 
 if ( OK == status1 ) then
  searchFilter = "(&(objectClass=user)(networkAddress=*))"
  attrsList = "networkAddress"

  status2, errMsg2 = nldap.search(TREE_ROOT, SEARCH_SUBTREE, searchFilter, attrsList) 
  if ( OK == status2 ) then
   -- "set" the function to use;
   -- the function has to be defined before the main script body
   myFunction = deleteNetworkAddress

   -- process each found entry, using the function pointed to by myFunction
   nLDAP.processData()

   nLDAP.close()
  else
   printf("Search error", errMsg2)
  end
 else
  printf("Error connecting to LDAP server", errMsg)
 end