[thread] créer des queues à nom variable

Bonjour à tous,
Je débarque ici pour une question assez pointue.
Dans un programme multithread, j'aurais besoin de créer plusieurs queues partagées, dont le nom est obtenu par une liste.

Le problème est qu'apparement, une queue est ne peut pas être un élément d'un tableau de hachage :

use strict;
use threads;
use Thread::Queue;
my %queue;
my $nom = "toto";
$queue{$nom} = new Thread::Queue; => syntax error

J'ai bien la solution de passer par un eval :
eval('our $'.$nom.' = new Thread::Queue');
Ce qui crée la queue $toto
Mais ce n'est pas propre et refusé par le strict...

Si quelqu'un a une solution, je suis preneur...

Merci d'avance.

Et avec

Code:

---

$queue{$nom}=Thread::Queue->new ;

---

ça ne marche pas mieux ?

Il n'y a pas d'erreur de syntaxe dans le code que tu nous as montré... Par ailleurs, il est possible qu'il soit préférable d'utiliser plutôt :

Code:

---

1 2 3 4 5 6 7 8 9 10

#!/usr/bin/perl use strict; use warnings;   use threads; use threads::shared; use Thread::Queue;   my %queue :shared; my $nom = "toto"; $queue{$nom} = new Thread::Queue;

---

--
Jedaï

OK ça marche, merci...