Affectation dans les problèmes d'opérateur conditionnel ternaire Perl

Question

Cet extrait de code Perl dans mon programme donne un mauvais résultat.

$condition ? $a = 2 : $a = 3 ; 
print $a; 

Quelle que soit la valeur de $condition est, la sortie est toujours 3, comment se fait?

Answer 1

Ceci est expliqué dans le Perl documentation.

En raison de l'opérateur Perl priorité l'instruction est en cours d'analyse comme

($condition ? $a= 2 : $a) = 3 ; 

Parce que le: opérateur produit un résultat assignable, 3 est affecté au résultat de la condition.

Lorsque $ condition est vrai ce moyen ($ a = 2) = 3 donnant $ a = 3

Lorsque $ condition est fausse ce moyen ($ a) = 3 donnant $ a = 3

la bonne façon d'écrire c'est

$a = ($condition ? 2 : 3); 
print $a; 

Nous sommes piqués par ce au travail, donc je suis ici en espérant d'autres afficherons trouveront utile.

Answer 2

Juste pour étendre la réponse précédente ... Si, pour une raison quelconque, les missions doivent faire partie du conditionnel, vous voudriez écrire ainsi:

$condition ? ($a=2) : ($a=3); 

Ce serait utile si vous affectez à différentes variables en fonction de la condition.

$condition ? ($a=2) : ($b=3); 

Et si vous choisissez la variable, mais l'attribution de la même chose, peu importe quoi, vous pouvez même le faire:

($condition ? $a : $b) = 3; 

Answer 3

Une suggestion à la réponse de Tithonium ci-dessus:

Si vous voulez assigner des valeurs différentes à la même variable, cela pourrait être mieux (le copy-book):

$ a = ($ condition)? 2: 3;

Answer 4

Une fois que vous avez une petite idée que vous pourriez souffrir de problèmes de priorité, une astuce pour comprendre ce que Perl a pensé que vous vouliez dire:

perl -MO=Deparse,-p -e '$condition ? $a= 2 : $a= 3 ; print $a;' 

Dans votre cas, ça va vous montrer:

(($condition ? ($a = 2) : $a) = 3); 
print($a); 
-e syntax OK 

... à quel point vous devriez dire "oh, ça l'explique"!

Answer 5

En raison de l'opérateur Perl priorité l'instruction est en cours d'analyse comme:

($condition ? $a = 2 : $a) = 3 ; 

Parce que le: opérateur produit un résultat assignable, 3 est affecté au résultat de la condition.

Lorsque $ condition est vraie, cela signifie $ a = 2 = 3 donnant $ a = 3

Lorsque $ condition est fausse, cela signifie $ a = 3 donnant $ a = 3

La bonne façon écrire c'est

$a = $condition ? 2 : 3; 

en général, vous devriez vraiment sortir de l'habitude d'utiliser conditionals à faire cession, comme dans l'exemple d'origine - il est le genre de chose qui conduit à Perl obtenir la réputation d'être écrire -seulement. Une bonne règle générale est que les conditions ne sont que pour des valeurs simples, jamais des expressions avec effets secondaires. Quand vous ou quelqu'un d'autre a besoin de lire ce code dans huit mois, préférez-vous qu'il se lise comme ça?

$x < 3 ? foo($x) : bar($y); 

Ou comme ça?

if ($x < 3) { 
    $foo($x); 
} else { 
    $bar($y); 
}