■No9732に返信(hiroさんの記事)
> 不正クリックと言いますのは、どうやら本人が一日に何度もクリックを
> して、ランクを上げているようなのです。

なるほど、つまり時間を置いて、ということでしょうか？
その場合はIPアドレス記録の対策も意味があるかもしれません。

> > 全くもって、CGIの知識がなく、ただ、りゅういちさまの設置方法の説明を
> 読みながらなんとか設置するのが精一杯でしたので、わたくしには無理では
> ないか？と少し不安ですが、調べながらやってみますので、もしよろしければ
> りゅういちさんのお手をわずらわせないよう、簡単にご説明いただけると嬉しいです。

まず、ip.log などの空ファイルを用意します。で、以下のコードを
157行目あたりの my($ad)=$ENV{'REMOTE_ADDR'}; の下に追加してみてください。

my $ipflag=0; # IPがすでにあるかのフラグ
open(IPI,"ip.log");
while (<IPI>){
  if($_ eq $ad){$ipflag=1; last;}#IPがすでにある場合フラグを立てて終わり
}
close(IPI);
if($ipflag){if($SSI){&html_($ARGV[1],0);}else{&gif_;}}#フラグがたっている場合
else{#そうでない場合
  if((-M "$tlog") < 1){#更新されてから1日以内ならIP追加
    open(IPO,">>ip.log");
    print IPO $ad;
    close(IPO);
  }else{#更新されて1日以上ならログをフォーマットして追加
    open(IPO,">ip.log");
    print IPO $ad;
    close(IPO);
  }
}