| ■7604 / ) |
Re[4]: ReverseAccess について。。
|
□投稿者/ たらきち -(2003/08/17(Sun) 00:12:49)
| 2003/08/18(Mon) 01:05:40 編集(投稿者)
何度も申しわけありませんです。。
たらきちです。
> 結局どちらを試したのでしょうか(＾＾;
> あと、改造後のCGIをサーバにアップして、URLを教えていただけますか?
両方試してみて両方同じような状態でした。
今回ご指示頂きましたほうをアップしてみました。
になります。今回お教えいただきました部分を修正したものです。
226行目からの記述になります
HTML
$rank1=0; $rank2=1; $count_tmp=0; $Flag=0;
foreach (sort { ($count{$b} <=> $count{$a}) || ($a cmp $b)} keys(%count)) {
($count{$_} == $count_tmp) || ($rank1 = $rank2);
$cnt=$count{$_};
if(($rank1 > $b_s || $cnt < $R_IN) && $B==0){last;}
$url=$_;
$url=$url{$_};
foreach $urls (@urls) {
$urls =~ s/\n//g;
($u,$n,$tu) = split(/;/,$urls);
if($url{$_} =~ /$u/ || $url{$_} eq "$tu"){
$url{$_}="$n";$url="$tu"; $Flag=1; last;
}
if($Flag==0){next;}
if(length($url{$_}) >・・・・以下省略・・・
お忙しいところすいませんです。。お時間ございますとき
ご覧いただければ幸いであります。。^^;
|
|
