Forum Webscript.Ru

Программирование => Perl => Тема начата: DartSidius от 03 Июня 2011, 08:18:23

Название: AD & Perl
Отправлено: DartSidius от 03 Июня 2011, 08:18:23
Возникла задача проводить автоматическую авторизацию пользователя в домене, когда он заходит на страничку...

С самой авторизацией разобрался:


use Net::LDAP;

my $ldap= Net::LDAP->new("*") || die print $!;
my $mesg = $ldap->bind("*", password=>"*") || die print $!;

print $mesg->error();


Вопрос:
как получить пароль и логин для передачи в лдап? чтобы именно автоматом, без всякого ввода...

так же интересует как получить какие у пользователя права есть...да и вообще например вывести списки груп и всех пользователей