Форумы портала PHP.SU :: Не работает рассыльщик комментариев к загрузкам на удалённом сервере

Здравствуйте! Я хочу разослать ко всем загрузкам на одном вап-сайте комментрарий. Написал для этого скрипт на пыхе. Вот код:
PHP:
скопировать код в буфер обмена
<?PHP 
/* Скрипт рассылки комментариев к эро - загрузкам на wapos.ru */
// В процессе изучения структуры скрипта CMS на вапосе, я понял, что самое первре видео имеет ид 111, а самое последнее - 7301
// Значит, начальная позиция 111, а последняя 7301 =)
$user = "St. Antoniy!"; // Имя
$comm = "Hello, World! && Must die!"; // Комментарий
// Если использовать комментарий на русском, то над все перекодировать предварительно в кодировку UTF-8, ведь wapos.ru - это WAP - сайт, а кодировка для wap по стандарту определена utf-8
if (!php_sapi_name() == "embed")
{
        @set_time_limit(0) or die("Для работы скрипта необходимо выключить безопасный режим или использовать скрипт, как исполняющий файл!");
}
for ($i=111;$i<=7301;$i++) // Цикл for
{
        $post = 'username='.$user.'&comment='.$comm.'&file_id='.$i.'&submit='.urlencode("Отправить"); // строка с пост-данными
        $fp = @fsockopen("wapos.ru", 80, $errno, $errstr, 10); // Открываем сокет
        if (!$fp) // если не работает,
        { 
                echo($errstr.':'.$errno); // то выводим сообщение об ошибке и прекращаем выполнение скрипта
                // exec("@pause");
                die();
        }
        $out  = "POST /video/comments.php?rand= HTTP/1.1\r\n"; // Указываем метод запроса страницы, путь к ней и версию протокола
        $out .= "Host: wapos.ru\r\n"; // Обязательный заголовок для HTTP/1.1
        $out .= "User-Agent: Nokia6230i/2.0 (Profile/MIDP-2.0; Configuration/CLDC-1.1; U; RU; Java;)\r\n"; // Поскольку с компов туда нельзя, мы эмитируем мобильный телефон
        $out .= "Accept: text/html, application/xhtml+xml, */*\r\n"; // чтоб определялось как телефон, поддерживающий wap 2.0
        $out .= "Accept-Encoding: */*\r\n"; // Пусто, чтоб страницы не сжимались в GIF-ZIP - формат
        $out .= "Accept-Charset: utf-8, windows-1251, cp866, x-mac-cyrillc\r\n";
        $out .= "Referer: http://wapos.ru/video/comments.php?id=".$i."\r\n"; // Указываем ложный реферер
        $out .= "Content-type: application/x-www-form-urlencoded\r\n"; // Указываем, что мы посылаем пост-переменные
        $out .= "Content-Length: ". strlen($post) ."\r\n"; // размер пост-запроса
        $out .= "Connection: Close\r\n\r\n"; // Для быстроты выполнения скрипта, пишем Connection: close. Если это убрать, то скрипт в выполнении замедлится раз в десять
        fwrite($fp, $out.$post."\r\n"); // Посылаем всю байду серверу
        $headers = ''; // Без комментаривев
        $page = ''; // Тоже говорить неочем
        while($dat = trim(fgets($fp, 1024))) $headers .= $dat; // Читаем загововки
        while(!feof($fp)) $page = fgets($fp, 4096); // Читаем ответ
        /*
                $f = fopen($i.".html", "w");
                fputs($f, $page);
                fclose($f);
        */
        fclose($fp);
        echo("Comment for ID ".$i." sended!\r\n");
}
// Вот и усё, после выполнения скрипта будет разослан комментарий ко всем эро-загрузкам на вапосе
?>