Discussion :

[Songohan]

Bonjour, je voudrais écrire un script perl qui se connecte à plusieurs ftp simultanément (un thread par ftp). ça, c'est facile. Ensuite, je voudrais savoir quand un thread est terminé pour en lancer un autre.

Je veux rapatrier des données en ftp et relancer un thread à chaque fois qu'un transfert est terminé. Est-ce possible ?

[djibril]

pourquoi faire des threads pour lancer des ftp à la suite ?
t'as pas besoin de threads pour ça

[Jedai]

A priori il veut faire plusieurs transferts à la fois, sur plusieurs serveurs on présume ? Mais tu n'as pas besoin des threads non plus, je te conseille d'apprendre à utiliser POE et d'employer l'un des composants POE pour client FTP.
Si tu tiens vraiment à utiliser des threads, tu peux savoir quels threads sont terminés en utilisant list(), bien que je te conseillerais plutôt une simple architecture avec des workers lisant leurs tâches sur une Thread::Queue.

--
Jedaï

[Songohan]

A priori il veut faire plusieurs transferts à la fois, sur plusieurs serveurs on présume ? Mais tu n'as pas besoin des threads non plus, je te conseille d'apprendre à utiliser POE et d'employer l'un des composants POE pour client FTP.
Si tu tiens vraiment à utiliser des threads, tu peux savoir quels threads sont terminés en utilisant list(), bien que je te conseillerais plutôt une simple architecture avec des workers lisant leurs tâches sur une Thread::Queue.

--
Jedaï

Je ne connais pas POE. Je ne comprends pas très bien comment utiliser les Thread::Queue, mais je pensais que Thread est obséléte et qu'il vaut mieux utiliser threads.

list() t'indique les threads non joined et non detached. Or un thread fini n'est pas joined et si j'attend qu'il soit join, l'exécution de mon programme reste en stand-by. Je veux pouvoir gérer mon nombre de thread. Au départ, je fixerai un nombre arbitraire, puis je le fixerai pour optimiser la bande passante de mon réseau.


Bon, ça fait beaucoup de blabla. J'ai trouvé ce que je cherche, c'est is_running() qui indique si le thread a terminé son éxécution. Etant donné que je ne veux pas récupéré de valeur, je pense que je vais le détacher une fois terminé.

J'espère avoir été clair .




Peux-tu m'expliquer à quoi tu pensais avec Thread::Queue ??

[Jedai]

Peux-tu m'expliquer à quoi tu pensais avec Thread::Queue ??

(Thread est obsolète mais Thread::Queue ne l'est pas et fonctionne parfaitement avec threads)
Au lieu de créer un thread par tâche, ce qui est couteux et dangereux (parce que les threads en Perl...), il te suffit de créer un pool de threads au démarrage et d'utiliser une Thread::Queue pour l'alimenter en tâches.
Ainsi tu as un "superviseur" qui tient le compte des tâches en court et terminées et des "workers" qui font le vrai boulot, c'est un schéma courant en programmation concurrente et nettement plus efficace que ce que tu te proposes de faire.

--
Jedaï