On Fri, 29 Nov 2002, Yann SOUCHON wrote:

> # Random salt.
> $salt = join '', ('.', '/', 0..9, 'A'..'Z', 'a'..'z')[rand 64, rand 64];
> print $ARGV[0], ':', crypt($ARGV[1], $salt), "\n";
Joli, merci!

--
 Félix Hauri  -  <[EMAIL PROTECTED]>  -  http://www.f-hauri.ch

--
http://www-internal.alphanet.ch/linux-leman/ avant de poser
une question. Ouais, pour se désabonner aussi.

Répondre à