What astroboy says.

But if you ever use the crypt function, it just uses 2 characters for the salt (as opposed to eight - and would probably truncate anyway):

use strict;

my $password = "whatever";
my @saltset     = ('a' ..'z', 'A' .. 'Z', '0' .. '9', '.', '/');
my $nsalt         = $saltset[$$ % 64] . $saltset[time % 64];
my $cryptedpass       = crypt($password, $nsalt);

print $cryptedpass,"\n"
[download]