Модераторы: ginnie, korob2001
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> 0рганизация цикла 
:(
    Опции темы
NewPerl
  Дата 24.8.2006, 17:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 24.8.2006

Репутация: нет
Всего: нет
сокеты

Это сообщение отредактировал(а) NewPerl - 25.8.2006, 15:36
PM MAIL   Вверх
NewPerl
Дата 24.8.2006, 22:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 24.8.2006

Репутация: нет
Всего: нет
Цикл я сделал, но почему-то пакеты отправляются только один раз и всё =(
Думаю дело в цикле.
Если надо могу кусок кода выложить

Это сообщение отредактировал(а) NewPerl - 24.8.2006, 22:59
PM MAIL   Вверх
korob2001
Дата 24.8.2006, 23:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 6
Всего: 61
Думаю проблема в выборе протокола, так как UDP не гарантирует что все пакеты будут доставлены к месту назначения и не используется для надёжного соединения с сервером. Попробуй сделать тоже самое но с TCP, если и это не поможет покажи код.

Это сообщение отредактировал(а) korob2001 - 24.8.2006, 23:01


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
NewPerl
Дата 24.8.2006, 23:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 24.8.2006

Репутация: нет
Всего: нет


Хотелось бы по udp отправлять, ведь он быстрее

Это сообщение отредактировал(а) NewPerl - 25.8.2006, 14:22
PM MAIL   Вверх
NewPerl
Дата 24.8.2006, 23:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 24.8.2006

Репутация: нет
Всего: нет
Я изменил код скрипта


Но всеравно работает очень слабо:
До запуска было отправлено пакетов 406 659
Запустил на 10 сек стало 416 346



Это сообщение отредактировал(а) NewPerl - 25.8.2006, 15:35
PM MAIL   Вверх
Nab
Дата 25.8.2006, 00:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 3
Всего: 37
Не нужно создавать в цикле новый объект каждый раз.

Код

$d = "d" x 999;    
$socket = IO::Socket::INET->new( Proto => "tcp", PeerAddr => "$ip", PeerPort => "$port") || die "Failed\n";    
while(1){    
    print $socket "USER $d\n";    
}



--------------------
 Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community 
FREESCO in Ukraine 
PM MAIL   Вверх
NewPerl
Дата 25.8.2006, 00:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 24.8.2006

Репутация: нет
Всего: нет
Так я же в предыдущем коде вродк так делал smile 

Всё, спасибо, разобрался теперь все пашет на ура !
спасибо smile 

Топ можно удалять или закрывать.
PM MAIL   Вверх
DiverD
Дата 22.9.2006, 23:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 225
Регистрация: 14.9.2005
Где: Белорусь

Репутация: 1
Всего: 2
так покажи как решил проблему
--------------------
[ FreeBSD & pERL p0WER eVERY dAY ]
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl: Системное программирование"
korob2001
sharq
  • В этом разделе обсуждаются вопросы относящиеся только к системному программированию на Perl
  • Если ваш вопрос не относится к системному или CGI программированию, задавайте его в общем разделе
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Системное программирование | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0723 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.