東北大 研究室 Web 開始 2003.3.1
10,000 人 2003.11.8 20,000 人 2004.4.28 30,000 人 2004.10.10
40,000 人 2005.2.11 50,000 人 2005.7.13 60,000 人 2005.12.6
70,000 人 2006.4.18 80,000 人 2006.7.28
電通大時代の研究室 のカウンタは、巷から copy して、1997 年 7 月 15 日より動かしはじめました。研究室の Home page 自体は 1994 年 4 月より動いています。
2001 年 8 月 20 日 200,000 人突破しました。
研究室 Web 開始 1994.4.1
カウンター開始 1997.7.15
30,000 人 1999.1.7, 40,000 人 1999.4.25 50,000 人 1999.7.8
60,000 人 1999.10.18, 70,000 人 2000.1.18, 80,000 人 2000.4.11
90,000 人 2000.5.23, 100,000 人 2000.6.28, 120,000 人 2000.10.6
140,000 人 2001.1.6, 160,000 人 2001.4.20, 180,000 人 2001.6.20
200,000 人 2001.8.20,
220,000 人 2002.1.11, 240,000 人 2002.7.23
260,000 人 2003.1.16
御願い: 100,000 単位でくぎれの良い ページにあたった人は 画像を送ってくださいませ。申し訳ありませんが謝礼はありません。
上のようなカウンタを表示させる方法(unix の WWW サーバのみ)を 説明します。
あなたは <!--#exec cmd="count.pl"--> 番目のお客様です。
をいれます。これで count.pl を実行した結果を、表示してく れます。 count.pl は、次に示すような perl の program です。 html file と count.pl は同じ directory にあることが必要です。
#!/usr/local/bin/perl $file='count'; $graphics='images'; open(DATA,"$file");while(){$count=$_;$count++;}close(DATA); $count_length=length("$count")-1; foreach $image_no (0..$count_length) {$img=substr($count,$image_no,1); print "<img src=\"$graphics/$img.gif\" alt=\"$img\" border=\"0\">";} open(DATA,">$file");print DATA "$count";close(DATA);ここで、$file が counter の数字が入る file です。count.pl は 実行可能なように
% chmod +x count.plをしておきます。
$graphics='/www/japanese/images';
にすれば ok です。