>>76です。先日はお世話になりました
>>79でつけて頂いたトリップ機能についてなのですが
トリップキーが筆頭の全角４文字、半角８文字で決定されてしまうため
利用者に同一トリップがあらわれないかと現状で少々の不安がございます。
トリップキーをもう少し長い文字列に対応していただくことは可能でしょうか
今一度お力添えをお願いいたします。

#ここから改造 by 丸投げ
$maeno_name = $name;#クッキーセット用
if($name eq ""){
$name = '名無しさん';
}

$name =~ s/★/☆/g;
$name =~ s/◆/◇/g;
if ($name =~ m/#(.*)$/) {
local($basyo, $tripkey, $salt, $trip);
$basyo = index($name,'#');
$basyo++;
$tripkey = substr($name,$basyo,8);
$salt = substr($tripkey."H.", 1, 2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$salt =~ tr/[\.\/0-9A-Za-z]/\./c;
$trip = substr(crypt($tripkey,$salt),-10);
$name =~ s/#(.*)$/ ◆$trip/;
}
#ここまで改造 by 丸投げ