Если Вам необходимо учитывать количество нажатий (кликов) на какую-то определенную ссылку то для этого конечно же необходим скрипт делающий это.
Ниже представлен простенький пример такого скрипта
#!/usr/bin/perl
$link_file="clcks.dat";# Файл куда будет помещаться статистика $query=$ENV{QUERY_STRING};
# Открываем файл open(LOG,"$link_file");
# Помещаем строки в хэш @statArray=<LOG>; $islink=0;
# Проходим по всем строкам for($i=0;$i<=@statArray-1;$i++){ # Разделяем строку на счет и ссылку ($count,$lnk)=split(//,@statArray[$i]); # Удаляем возврат каретки chop($lnk) if $lnk =~ / $/; # Проверяем есть ли запрошенная ссылка # в базе if($lnk eq $query){ # если есть...... # инкриминируем счетчик $count++; Перезаписываем строку в хэш @statArray[$i]="$count$lnk "; $islink=1; break; } } close(LOG); open(LOG,">$link_file");
#Записываем хэш в файл print LOG @statArray; # Если ссылки в базе нету, добавляем if($islink==0){print LOG "1$query ";}
close(LOG);
# Переходим на ссылку print "Location: $query ";
В качестве запроса этому скрипту передается ссылка на которую надо перейти, например click.cgi?http://webprog.vov.ru. Пользователь нажав на такую ссылку попадет на сайт http://webprog.vov.ru, а в файл указанный в переменной $link_file будет записана информация вида количество_нажатийссылка. Для работы необходимо создать файл указываемый в $link_file и установить ему права на запись (для Unix).
