lynx
Advanced lynx | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
GOOSE
Цитата:| О! У меня этот кусок заремен... Так надо?! |
Нет, у тебя вместо нужного куска, есть другой нужный кусок. Все должно работать.
Сделай так.
Замени в приведенном тобой кода строчку:
Код:
srand(time * (time *time));
|
На:
Код:| rand(time * (time *time)); |
Должно помочь.
Если не поможет, то
Приведенный тобой кусок замени на этот:
Код:
# added by DimoN
#if (($passwordverification eq "yes") && ($emailfunctions ne "off")) {
# my @datapassword = qw(A B C D E F G H J K L M N P Q R S T U V W Y Z a b c d e f g h j k l m n p q r s t u v w y z 0 12 3 4 5 6 7 8 9);
# srand(time * (time *time));
# for(1..7){$password .= $datapassword[rand(@datapassword)];}
#}
if (($passwordverification eq "yes") && ($emailfunctions ne "off")) {
$seed = int(rand 100000);
$password = crypt($seed, aun);
$password =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$password =~ s/\.//g;
$password =~ s/\|//g;
$password = substr($password, 0, 7);
}
|
Хотя это уже не должно помочь.  В общем, сделай и скажи, что получилось.
|
