Comment puis-je utiliser la valeur d'une variable comme nom de variable en Perl?

Question

Si j'ai une variable, $bar, qui est égale à la chaîne "foo" et $foo est égal à 0xdead, comment puis-je obtenir la valeur $foo alors que j'ai seulement la chaîne pour le nom de la variable? Essentiellement, je veux faire une sorte d'indirection de pointeur sur l'espace de nom global ou une recherche de hachage sur l'espace de noms global.

Ce qui suit ne fonctionne pas:

perl -e 'my $foo=0xdead; my $bar ="foo"; print ${$bar}."\n";' 

Il imprime seulement la nouvelle ligne.

Answer 1

Cette astuce fonctionne uniquement avec les variables globales (les références symboliques recherchent le symbol table du package en cours), i. e.

perl -e '$foo=0xdead; my $bar ="foo"; print ${$bar}."\n";' 

Si vous voulez attraper lexicales, vous devrez utiliser eval ""

perl -e 'my $foo=0xdead; my $bar ="foo"; print eval("\$$bar"),"\n";' 

Mais en utilisant eval "" sans fin est considéré comme mauvais style en Perl, ainsi que l'utilisation des variables globales. Envisagez d'utiliser des références réelles (si vous le pouvez).

Answer 2

Sans my et $$bar fonctionne pour moi:

$ perl -e '$foo=0xdead;$bar ="foo"; print $$bar."\n";' 
57005

Vous pouvez en savoir plus sur l'utilisation a variable as a variable name dans le Perl FAQ List.

Answer 3

Il y a très très très peu de précieuses instances dans Perl où vous devez utiliser des références symboliques. Éviter les références symboliques dans tous les autres cas ne concerne pas le style. Il s'agit d'être un programmeur intelligent. Comme mjd explique en Why it's stupid to "use a variable as a variable name":

La racine réelle du code de problème est la suivante: Il est fragile. Vous vous mêlez contrairement aux choses quand vous faites cela. Et si deux de ces choses différentes ont le même nom, elles entreront en collision et vous obtiendrez la mauvaise réponse. Vous avez donc une longue liste de noms qu'il faut faire attention de ne pas réutiliser, et si vous bousiller, vous obtenez une erreur très bizarre. C'est précisément le problème que les espaces de noms ont été inventés pour résoudre, et c'est juste ce qu'est un hachage: Un espace de noms portable.

Voir également Part 2 et Part 3.