optimisation script perl

Bonjour,

J'ai un script dans lequel je teste que le résultat de plusieurs variables est égal à OK.

Code:

---

1 2 3 4 5

if ( "${V_Aquittement_Demarrage}" eq "OK" && "${V_Aquittement_TA}" eq "OK" && "${Categorie}" eq "OK" ) { ....   }

---

Comment puis je faire pour optimiser tout cela et éviter les && redondants ?

Qu'entends-tu par optimisation ?
Le code est simple (complexité linéaire). Il ne sera pas plus rapide avec aucune autre méthode.

Si tu entends pas optimisé, plus court (en nombre de caractère), ça me également semble difficile de faire plus court.

Tu peux tout au plus alléger la syntaxe :

Code:

---

1 2	if ( $V_Aquittement_Demarrage eq "OK" && $V_Aquittement_TA eq "OK" && $Categorie eq "OK" ) { ....

---

Peut-être que Vince2005 attendait quelque chose comme :

Code:

---

1 2 3 4 5

if (($V_Aquittement_Demarrage && $V_Aquittement_TA && $Categorie) eq "OK") { ....   }

---

J'ai déjà utilisé un tel test sans me faire insulter par l'interpréteur ni obtenir de résultats déconnants.

Peut-être, mais il ne correspond pas du tout du test initial.
Ton test vérifie que $V_Aquittement_Demarrage et $V_Aquittement_TA sont définis et non vides et que $Categorie est égal à "OK".
Ce test aura un fonctionnement différent de celui désiré si, par exemple, $V_Aquittement_Demarrage et $V_Aquittement_TA valent "NOK" (dans ce cas, il sera vrai alors que dans le cas demandé, il sera faux).

Citation:

---

Envoyé par Philou67430

Peut-être, mais il ne correspond pas du tout du test initial.
Ton test vérifie que $V_Aquittement_Demarrage et $V_Aquittement_TA sont définis et non vides et que $Categorie est égal à "OK".
Ce test aura un fonctionnement différent de celui désiré si, par exemple, $V_Aquittement_Demarrage et $V_Aquittement_TA valent "NOK" (dans ce cas, il sera vrai alors que dans le cas demandé, il sera faux).

---

Merci pour l'explication :ccool: ; "plus j'apprends et plus je mesure mon ignorance"...