Главная страница статей --> Советы по фотошопу, графике и хитрости в построении php кода

Счетчик нажатий на ссылку на Perl

Источник: realcoding.net

Если Вам необходимо учитывать количество нажатий (кликов) на какую-то определенную ссылку то для этого конечно же необходим скрипт делающий это.

Ниже представлен простенький пример такого скрипта

#!/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).



Похожие статьи:
- PHP gzip module
- Применение cURL и libcurl в php
- Регулярные выражения, Часть I
- Perl и работа с сокетами
- Безопасно-ориентированное программирование в PHP5
- Создание индекса для сайта
- Счетчик посещений на Perl
- Python: Питон высокого полета...
- Семь изысканных рецептов для программистов
- Смогут ли пауки проиндексировать ваш web-сайт?
- Keywords - ключевой фактор успеха
- Работа с MySQL. На дорожку
- Правильная оптимизация сайта с фреймами


Оглавление | Обсудить на форуме | Главная страница сайта | Карта сайта |

Контакты
Редакция:
[0.001]