Re: Смена пароля у всех пользователей.

> On Wed, 7 Mar 2012 17:10:10 +0600
> "Pavel Loginov" <CGatePro@mx.ru> wrote:

>> Здравствуйте, .
>> 
>> Приветствую.
>> 
>> Появилась необходимость сменить всем пользователям в домене пароль.
>> Т.е.  как  я  программированием плохо знаком то помогите объединить 
>>2 
>> функции:
>> 
>> $AccountList = $cli->ListAccounts('domen.com')
>>                 || die "Error: ".$cli->getErrMessage.", quitting";
>>  foreach(keys %$AccountList) { print "$_\n"; }
>>  
>> $cli->SetAccountPassword('john','newPass') 
>>        || die "Error: ".$cli->getErrMessage.", quitting";

> вы всем пользователям хотите один и тот же пароль что ли поставить?

Да, всем один пароль.

> тогда так:

> $AccountList = $cli->ListAccounts('domen.com')
> || die "Error: ".$cli->getErrMessage.", quitting";

> foreach my $acct (keys %$AccountList)
> {
> $cli->SetAccountPassword($acct,'newPass')
> || die "Error: ".$cli->getErrMessage.", quitting";
> }

Вот оно как. Спасибо. :) В перле все как-то подругому, не привычно.

> но лучше все-таки найдите поблизости кого-нибудь со знанием перла и не
> забудьте сделать бэкап...

Я для начало на тестовой машине попробую, а потом уже на продакщене. Ну и бэкапы конечно же есть. )

> Best wishes,
> Maxim

> ##################################################################
> Вы получили это сообщение потому, что подписаны на список рассылки
> <CGatePro@mx.ru>.

> Чтобы отписаться, отправьте сообщение на адрес <CGatePro-off@mx.ru>
> Чтобы переключиться в режим дайджеста - mailto:<CGatePro-digest@mx.ru>
> Чтобы переключиться в индексный режим - mailto:<CGatePro-index@mx.ru>
> Для административных запросов адрес <CGatePro-request@mx.ru>
> Архив списка: http://mx.demos.su/lists/cgp-russian/
Получено Wed Mar 07 12:57:22 2012