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.