☆☆架空請求業者におしおきするスレ4☆☆
■ このスレッドは過去ログ倉庫に格納されています
0378名無しプログラマ ◆UUguph2t1E
2005/05/06(金) 08:13:41ID:A6Jf1YZ60http://www60.tok2.com/home/september/rec.html
#----------------------#
# パスワード暗号処理 #
#----------------------#
sub encrypt {
local($inpw) = $_[0];
local(@SALT, $salt, $encrypt);
@SALT = ('a'..'z', 'A'..'Z', '0'..'9', '.', '/');
srand;
$salt = $SALT[int(rand(@SALT))] . $SALT[int(rand(@SALT))];
$encrypt = crypt($inpw, $salt) || crypt ($inpw, '$1$' . $salt);
return $encrypt;
}
■ このスレッドは過去ログ倉庫に格納されています