Bonjour,
Voila je suis nouveau et je suis débutant sur perl, je dois faire quelque script perl sous server 2008 qui doit commander l'active Directory.
J'ai deja fait des script perl tout simple en renommant l'extension du fichier en .pl, avec google et quelque tuto je m'en sort finalement pas mal!
Mais je dois appliquer quelques script sous server 2008 avec l'AD, malgrer mes recherche google, je n'est pas trouvée grand chose.. je viens donc a votre aide!
Bon voila mes script version phrase!
-Générer un 1 mot de passe de 8 caracteres
Ma recherche google a abouti a cela :
Ce script ne fonctionne pas du tout.. Et je ne c'est pas comment le modifier pour le faire fonctionner avec l'AD de server 2008.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 sub randomPassword { my $password; my $_rand; my $password_length = $_[0]; if (!$password_length) { $password_length = 8; } my @chars = split(" ", "a b c d e f g h i j k l m n o p q r s t u v w x y z - _ % # | 0 1 2 3 4 5 6 7 8 9"); srand; for (my $i=0; $i <= $password_length ;$i++) { $_rand = int(rand 41); $password .= $chars[$_rand]; } return $password; }
- Générer le login (1ere lettre du prénom en minuscule + NOM)
La encore chez google c'est le brouillard!
- Récupérer 1 info dans le fichier et affiche la valeur de 3 variables (nom/prenom)
De même rien trouver sur google
- Générer 1 compte utilisateur d'Active directory
idem!
En esperant avoir de l'aide de votre part!
Merci !
Partager