Bonjour,
voici un petit programme perl pour generer des mots de passe,
l'inconvenient sont qu'ils ne sont pas evident a retenir et la tentation
de les noter sur un bout de papier trop grande.
#!/usr/bin/perl -w
#password_generator.pl
use strict;
my @chars=(33..91,93..126);
my $num_chars = @chars;
my $length;
my $funny = '!"#$%&\'()*+,-./:;<=>[EMAIL PROTECTED]|}~';
print "Entrer le nombre de caracteres de votre mot de passe : ";
chomp($length = <STDIN>);
die "La longueur doit etre superieur a 8 caracteres !" if $length <=7;
while (1) {
my $password = '';
foreach (1...$length) {
$password .= chr($chars[int(rand($num_chars))]);
}
if ($password =~ /[a-z]/ and $password =~ /[A-Z]/ and $password
=~/[0-9]
/ and $password =~ /[$funny]/){
print $password, "\n";
exit;
}
}
Fabrice Cartron wrote:
Bonjour à tous,
je dois mettre en place un serveur FTP chez mon employeur
(imprimerie de 140 personnes) afin de permettre aux clients de
nous envoyez leurs fichiers par ce biais plutot que par mail.
Le panel de clients concerné s'élève à environ 150.
Chaque client doit disposer de son login (pas d'accès public).
Question: existe-il une appplication qui me permette de générer
des mots de passe de manière automatique, et qui me permette
également le stockage sécurisé de ces mots de passe, en cas d'oubli.
Merci à tous ceux qui m'apporteront des éléments de réponse.
Bye.
