Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Системное программирование > завершение процесса (windows)

Автор: Vittaliy 26.10.2007, 08:25

Доброго времени суток.

Вот потребоволось создать несколько потоков которые необходимо завершать и запускать вновь про изменении параметров.

То что вызывается через async:

Код


sub threads_sub ($$$) # логин, пароль, порядковый номер потока
{

  my $_ID = $_[2];
  my $_login = $_[0];
  my $_password = $_[1];  

        
 while (!$stop_floag_threads[$_ID])
 {
  second_attempt($_login, $_password, $_ID);  
  sleep $time_to_sleep;
 }


 
 print "\n Завершение  потока  $_ID";
 return;
}

При выставлении $stop_floag_threads[$SD_ID] в 1, надпись "Завершение потока ..." наблюдаю, но при получении threads->list количество потоков не уменьшается.
как загасить этот поток чтобы он не фигурировал в threads->list?