Мне нужно извлечь все организационные единицы из заданной строки DN, я использую модуль Net :: LDAP и этот небольшой скрипт:
my $msg = $ldap->search(
base=>'DC=sample1,DC=sample2',
filter=>'(objectclass=User)',
);
foreach $entry ($msg->entries) {
$dn = $entry->dn;
#how can i retrieve OUs?
}
Например, если dn возвращает эту строку:
CN = образец выборки, OU = один, OU = два, DC = sample1, DC = sample2
Я хочу получить Один и Два.