Discussion :

[cnicolas]

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.

[Schmorgluck]

Et avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

ça ne marche pas mieux ?

[Jedai]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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ï

[cnicolas]

OK ça marche, merci...