画像を使ったアクセスカウンターですが。。。
どなたか教えていただければ大変ありがたいです。
画像（0.gif～9.gif）を使用し、アクセスカウンターを作る
次のソースの内、
-------------------------------------------------------------------
#!c:/perl/bin/perl
require './sub_lock.pl';
$countfile = "./count.log";
$lockdir = "./lockdir";
exit unless(&lock($lockdir));
open(COUNTFILE, "+<$countfile");
chomp($count=<COUNTFILE>);
$count++;
seek(COUNTFILE, 0, 0);
print COUNTFILE "$count\n";
truncate(COUNTFILE, tell(COUNTFILE));
close(COUNTFILE);
&unlock($lockdir);
$count_img = sprintf("%04d", $count);
$count_img =~ s/(.)/<img src=".\/images\/$1.gif">/g;
print "content-type:text/html\n\n";
print $count_img;
exit;
-------------------------------------------------------------------
$count_img =~ s/(.)/<img src=".\/images\/$1.gif">/g; の
「（.）」と「$1」になっているところが、どうも理解できなくて
困っています。
「=~ s」がパターンマッチであることだけは知っています。
CGI辞書などを調べてもやはり意味がわからず、お手上げ状態です。
どうぞよろしくお願いいたします。
補足
すみません。 冷静に自分のかいた文章を読んで、恥ずかしくなりました。 HTMLを書くのはドリームウィーバーを使っています。 サーバにアップする時はWinSCPです。