12.02.2008, 21:06
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
С нами:
10378404
Репутация:
1095
|
|
>> имхо так интересней
неа.. )
>> Кривовато написано , мой вариант
ну тогда вот и мой: +)
Код:
sub xor_password {
my $pwd = shift;
my $xor = "\xF3\x26\x81\xC4\x39\x86\xDB\x92"
. "\x71\xA3\xB9\xE6\x53\x7A\x95\x7C";
return substr($pwd^$xor, 0, length($pwd));
}
|
|
|