2chの動作報告はここで。−35−

トリップが化ける原因が判明。
perl-5.8.0とbbs.cgiのせいだぞｺﾞﾙｧ！

>>15
という事は、どうやらさんが
何かをごにょごにょすれば直るという事?

どうやらさんに期待。

トリップが化ける→トリップの結果がいつもと違う

salt に与える文字列が問題のようです。
仕様が変わっていなければこんな感じになっていると思います。

my $change_salt = substr($handle_pass, , 1) . "H";
$handle_pass = substr(crypt($handle_pass, $change_salt), -8);

これだと salt がそのままの文字列で暗号化してしまうので、

my $change_salt = substr($handle_pass, , 1) . "H";
$change_salt =~ tr/\.-z/./c;
$change_salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$handle_pass = substr(crypt($handle_pass, $change_salt), -8);

とすれば多分大丈夫です。