The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]




Версия для распечатки Пред. тема | След. тема
Новые ответы [ Отслеживать ]
Perl::LDAP - не полный результат, !*! Dr. Nebula, 18-Авг-05, 15:43  [смотреть все]
Имеется следующая задача - под FreeBSD вытащить все пользовательские почтовые ящики из АД. Попробовал как ldapsearch из пакета OpenLDAP так и модуль Perl - результат одинаковый: что то выдергиваем, но почему то не все...
Вот код:

#!/usr/bin/perl
use Net::LDAP;

$ldap = Net::LDAP->new("newpdc.office.company.ru");

$ldap->bind("cn=ldapquery,dc=office,dc=company,dc=ru", password=>"PassworD");

$mesg = $ldap->search(filter=>"(objectClass=*)", base=>"dc=office,dc=company,dc=ru");

@entries = $mesg->entries;

foreach $entry (@entries) {
        @mail = $entry->get_value("proxyAddresses");
        if(defined(@mail)) {
                print "E-Mail: @mail\n";
        }
        undef(@mail);
}

P.S Под Виндой, VB скрипт вытаскивает все записи... То есть дело но в АД...

  • Perl::LDAP - не полный результат, !*! levsha, 16:52 , 18-Авг-05 (1)
    >P.S Под Виндой, VB скрипт вытаскивает все записи... То есть дело но
    >в АД...

    Может быть дело таки в AD: например в настройках OpenLDAP сервера есть параметр sizelimit, который задает максимальное количество возвращаемых записей на search и который по умолчанию равен 500

    • Perl::LDAP - не полный результат, !*! Dr. Nebula, 17:21 , 18-Авг-05 (2)
      >>P.S Под Виндой, VB скрипт вытаскивает все записи... То есть дело но
      >>в АД...
      >
      >Может быть дело таки в AD: например в настройках OpenLDAP сервера есть
      >параметр sizelimit, который задает максимальное количество возвращаемых записей на search и
      >который по умолчанию равен 500

      Спасибо, я уже разобрался - действительно дело было в sizelimit, достаточно было ограничить правильно фильтром запрос и все стало хорошо :)




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру