古い記事
ランダムジャンプ
新しい記事
ChangeLog 日記のインデックスページの下の方でテスト中。ファイルのタ
イムスタンプをカウンターとして使用しているので、エコかつロバストか
な、と (どうだろう...あやしいな)。基本的には以下のような感じ。しば
らくテストしてみて平気そうなら設置方法などを解説した公開ページを作
るかな。
#!/usr/bin/env perl

use strict;
my $counter_file_dir = "kcnt";
my $id = shift @ARGV;
my $fn = "$counter_file_dir/$id";
my $cnt = ((stat $fn)[9]) + 1;
utime($cnt, $cnt, $fn);

print "Content-type: text/plain;\n\n";
print "document.write('$cnt');\n";
(無償・無保証・著作権放棄 <http://lifehacks.ta2o.net/byebye-copyright.html>)

1 アクセスで 1 秒進む、と考えるとロマンがあるかもしれません。3600
アクセスで 1 時間、86400 アクセスで 1 日。アクセス数 0 は、1970 年
1 月 1 日 0:00 を意味するので、今日までたどりつくには 10 億アクセ
ス以上ないとだめですね。大変だ...。

(追記: くっつきカウンターのページ
 <http://ta2o.net/tools/kuttuki-counter/>)
この記事に言及しているこのブログ内の記事