【簡単カウンターCGI】Perlでアクセスカウンターを簡単につくってみよう【簡単カウンターCGI】Perlでアクセスカウンターを簡単につくってみようPerlを使って、簡単にアクセスカウンターを作ります。ここでは、ページごとのアクセスカウンターを簡単につくることができるスクリプトをご紹介します。つかってカウンタを埋め込みます)・CGIのGETメソッドでカウンタのファイル名を任意に指定できる・日付毎のトータルカウントも同時にカウント(表示はしない)です。カウンタのファイル名を任意に指定できるので、ページのURLをカウンタ名として引き渡せば、各ページごとに異なるカウンタを表示できます。特定のキーワードを引き渡せば、同じキーワードが引き渡されたページの合計カウンタを表示できます。いう形式)のファイルでカウント数を保存します。以下がカウンターのプログラムです。始まるファイル名に限定することで、意図しない文字列を入れたCGI実行を防ぐ。leftmargin=\"0\">$count</body></html>";####################################################以下は、日にち別の累計を記録。$filename;exit(0);処理の中でカウンターファイルをリネームしていますが、これはいろいろ試した結果、カウンタをtempファイルに書き込んだ後、リネームするやり方が、アクセス競合時でもデッドロックしにくいからです。ベストではないですが実績が良かったので採用しています。・カウンターCGIの呼び出しHTMLHTMLからiframeで呼び出すと、iframeの中にカウンターが表示されます。ホームページなどのHTMLファイルには以下のように記載して、呼び出します。frameborder="0"></iframe>〜ホームページの本文〜表示させたいところに、上のコードを入れます。iframeで埋め込みます。サイズは適宜調整してください。「page1」と赤字で書いてますが、これがカウンター数を保存するファイル名となります。相当するところを異なる文字列にします。◆自動的にページ毎のカウンタを作りたい場合ファイル名別のアクセスカウンタにしたい場合は、各ページに以下のようなJavascriptを書いておくと、ファイル名がURLになるので、いちいち記載しなくても良いです。JSファイルにしておいて読み込ませれば、各HTMLファイルに以下の関数を記載する手間も省けます。置き換えておくことが必要です。今日の総合計アクセス数を表示してみたいページ単位ではなく、すべてのページの本日の合計アクセス数、って気になりますね。(CGI)プログラムは、ページごとのカウントとその表示のみで、各日の総トータルカウンタ数は記録しているものの表示はしていません。そのため、別途、その日の総トータルのアクセス数の表示のみ行うプログラムが以下となります。このCGIは、その日の総トータルのカウンタ数の表示のみで、カウントする動作はしません。frameborder="0"></iframe>〜ホームページの本文〜表示は、iframeで埋め込みます。サイズは適宜調整してください。今月・先月の総合計アクセス数を一覧で表示してみたい今度は、今月と先月の総合計アクセス数を一覧形式で表示します。「コロン(:)」「スラッシュ(/)」「コンマ(.)」を「アンダーバー(_)」に置換する場合があります。