Comparaison de 2 chaines de caractères en perl [Résolu]

[rimenis]

Bonjour à tous ;
SVP je sais pas pourquoi le resultat est tjrs fausse
voici le code

Code :

1
2
3
4
5
6
7
8
9
10
11
 
print "@tableau[2]";
 
if( "@tableau[2]" eq "able")
{
print "@tableau[2]";
}
else
{
print "NO";
}

sachant que @tableau[2] = "able" alors pourquoi le resultat du test est tjrs NO
Merci de m'aider ..

[Lolo78]

1. Tu veux sans doute utiliser $tableau[2] et non @tableau[2].

2. Comment est rempli ton tableau? Peut-être contient-il autre chose que 'able' (par exemple, un retour chariot invisible en fin de chaîne).

[rimenis]

je suis débutante en perl à mon avis pour accéder à un élément de tableau on fait @tableau[2] , si nn @tableau[2]="able"

[rimenis]

comment enlever un retour chariot invisible de la chaine ?

[Lolo78]

@tableau désigne un tableau sous la forme d'une liste d'éléments, $tableau[1] désigne le second élément du tableau @tableau (puisque le premier a pour indice 0).

Si le contenu de ton tableau est lu depuis unfichier ou saisi au clavier par l'utilisateur, enlève le retour chariot avec la fonction chomp. Par exemple;

Code :

1
2
my $ligne = <$DATA_IN>; # lit une ligne du fichier dont le descripteur est $DATA_IN
chomp $ligne; # élimine les caractères de retour/saut de ligne/retour chariot/ etc.

[rimenis]

Bonjour ,
merci pour toutes votre réponses , mon problème est résolu