Salut,
En fait le code intéressant est documenté dans perlfunc (fonction crypt) :
system "stty -echo";
print "Mot de Passe : ";
chomp($word = <STDIN>);
print "\n";
system "stty echo";
print "Votre mot de passe top secret est '$word'.\n"
La vraie réponse n'est donc pas du Perl mais du shell :
man stty. ;-)
Poste le Saturday 26 May 2007 18:03:34