Question

我进行了LDAP搜索，因此我得到了条目。

在某些条目中缺少某个属性（例如atrribute＆＃34; o＆＃34;）。

我需要添加这个＆＃34; o＆＃34;归因于缺少它的条目。

注意：我不需要将此值更新为LDAP服务器。我只需要添加这个属性＆＃34; o＆＃34;以及作为搜索结果的结果变量中的值。

我有以下代码：

 if($entry->exists('o')){
      func($entry);//this funtion manipulates the entry
 }
 else{
      # I need the code here to add the "o" attribute and a value to the $entry
      func($entry);
 }

如何添加此属性＆＃34; o＆＃34;变量？

Answer 1

我假设该条目是Net::LDAP::Entry对象？如果是这样，您应该可以通过调用“add”来添加属性：

$entry->add( 'o' => 'new value' );

所以你的例子看起来像这样：

if($entry->exists('o')){
      func($entry);//this funtion manipulates the entry
}
else{
      $entry->add( 'o' => 'new value' );
      func($entry);
}

如何在perl中为LDAP搜索的结果添加属性

1 个答案: