アクセス解析改造。
で。
ちょこっとアクセス解析の改造などを。といっても、自力ではなく他サイトを参考になので頼りない話ではあるが、まぁ備忘録だしいいや。参考サイトが最新版を対象にしていないようで、行番号にズレがあったのでメモ。
http://www.sue445.net/cgi/acc.htmlを参考に、futomiのアクセス解析CGIスタンダード版の改造を。結局プロフェッショナル版に関してはこのあたりが不明だったのであきらめました。
まず、http://www.futomi.com/からアクセス解析スタンダード版をダウンロード(現在では3.8.1が最新版)。その後acc.cgiを書き換える。
まずline:9(でなくてもいいけれど、できるだけ上部っていうとこれぐらい?)
$BOOKMARK = '<b>[ ブックマーク or URL直接入力 ]</b>';
で、リンク元一覧を表示するときに吐き出す文字列を定義。
リファラが存在しないときにブックマークとしてカウントするために、line:458-459で
next unless($referer{$key} =~ /^http/); $referer_list{$referer{$key}} ++;
をコメントアウト。代わりに
if($referer{$key} eq '-'){ $referer_list{$BOOKMARK} ++; } else{ next unless($referer{$key} =~ /^http/); $referer_list{$referer{$key}} ++; }
と記述。
リンク元サイトをカウントする際にブックマークを除外するため、line:1200の
if($Flag) {next;}
の前に、
if($url eq $BOOKMARK){ $Flag = 1; }
を記述。
またリンク元サイトを吐き出す際にどうも文字数制限があるようなのでそれを削除する。line:1224の一文
print "<TR BGCOLOR=\"#EAEAEA\"><TD ALIGN=\"CENTER\">$dsp_order</TD><TD><A HREF=\"$key\">$dsp_url</A></TD><TD ALIGN=\"RIGHT\">$refererSite_list{$key}</TD><TD class=\"size2\">\n";
をコメントアウトし、代わりに
if($key eq $BOOKMARK){ print "<TR BGCOLOR=\"#EAEAEA\"><TD ALIGN=\"CENTER\">$dsp_order</TD><TD>$key</TD><TD ALIGN=\"RIGHT\">$referer_list{$key}</TD><TD class=\"size2\">\n"; } else{ print "<TR BGCOLOR=\"#EAEAEA\"><TD ALIGN=\"CENTER\">$dsp_order</TD><TD><A HREF=\"$key\" title=\"$key\">$dsp_url</A></TD><TD ALIGN=\"RIGHT\">$referer_list{$key}</TD><TD class=\"size2\">\n"; }
を記述する。