ぜろちゃんねるスクリプト総合質問スレ Part7

274 ：◆hikArinCL2 ：2005/10/30(日) 22:02:24 ID:???0

>>273
リンク先のページはcryptのmanなので確かに難しいと思いますが、要は昔アメリカの
暗号輸出規制の名残でcrypt関数の暗号アルゴリズムがふたつ存在する、ということです

ちょっと遅くなっちゃったけどパスワードを確認するスクリプトを載せておきます
(下をコピーしてcrypt.cgiといった名前で保存、アップロード、パーミッションを0705に変更)
もし設置してログインが出来なかった場合このスクリプトにアクセスして
デフォルトのパスを確認してください。「431XyHmErk」であればログイン可能です
違っていればそのパスワードを張り付けてusers.cgiに直接書き込んで下さい

#!/usr/local/bin/perl

my $pass = "zeroch";
my $key = "0000000001";

print "Content-type: text/html\n\n";
print substr(crypt($pass,substr(crypt($key,'ZC'),-2)),-10), "\n";