Кликер своими руками

Спецвыпуск Хакер, номер #004, стр. 004-104-2

$ua = new LWP::UserAgent;

$ua->agent("Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt)");

$ua->timeout(60);

$ua->proxy('http',"http://".$pr);

print "Try... $pr ";

Браузер готов, теперь займемся заголовком, который браузер передаст серверу.

$h1 = new HTTP::Headers

Accept => 'application/vnd.ms-excel, application/msword, image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-comet, */*',

User_Agent => 'Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt)',

Referer => 'http://www.xakep.ru/default.asp';

Замени "http://www.xakep.ru/default.asp" на адрес своей страницы, на которой висит кнопка топа. Настало время делать запрос:

$req1 = new HTTP::Request ('GET', 'http://fomenko.ru/cgi-bin/top/lspro.cgi?click=номер', $h1);

$response=$ua->request($req1);

$suc=$response->is_success;

Делаем запрос к серверу и получаем от него ответ. Слово "номер" замени на свой номер, который тебе выдали при регистрации.

Теперь надо обработать результат, и если все прошло нормально, запишем его в файл "click.log"

($suc) || print $response->code;

if ($suc) {

open(FH,">>click.log");

print FH $pr."\n";

close FH;

};

($suc) && print "+";

И завершим работу скрипта

exit;

Вот и весь текст скрипта. Не правда ли, все просто? Самое сложное - это найти шелл :).

Установка

Если тебе повезло и ты достал где-то шелл, на котором есть перл, и можно запускать фоновые процессы, считай, что ты #1 (Намба Ван, то есть :)). Как определить, есть ли на твоем шелле возможность запустить кликер или нет? Кликер запускается с помощью программки "cron". Это своеобразный аналог Планировщика из виндов. Ты ему даешь программу, которую надо запускать, и устанавливаешь время. Для создания задания тебе необходимо будет создать файл в формате "crontab".

Допустим, ты решишь, что твой скрипт должен запускаться через каждые 20 минут, начиная с полуночи. Для этого тебе надо написать:

0, 20, 40, * * * * clicker.pl

Где "clicker.pl" - имя твоего кликера.

Если ты так и не нашел шелл, то можешь попробовать вызывать скрипт каждый раз, когда на твою страничку заходит посетитель. Но для этого твой хостинг должен поддерживать perl и ssi. Изменим чуть-чуть наш скрипт. Для этого после строки:

#!/usr/bin/perl

добавь:

print "Content-type: text/html\n\n";

И в html файл своей странички добавь ssi команду вызова скрипта:

<!--#include virtual="/cgi-bin/clicker.pl"-->

Предварительно скопировав "clicker.pl" в каталог "cgi-bin" и установив права доступа к файлу командой "chmod 755".

Заключение

Не советую тебе слишком увлекаться накруткой показов/кликов. Это, конечно, рульно, когда на твою хоумпагу ходят люди. Но когда вместо людей на нее ходят твои же клики, это совсем не кул. А представь себе, если все отстойные сайты начнут накручивать себе показы. Это будет гонка кликеров. А хорошие и нужные сайты останутся а глубоком анусе. :( Так что, приятель, пиши кликер только если у тебя как раз такой сайт, а раскручивать отстой лучше не надо - его и так слишком много. Удачи!