Posez votre question Signaler

[PERL] regexp [Résolu]

wafa_o 101Messages postés 16 juillet 2008Date d'inscription 4 janvier 2011Dernière intervention - Dernière réponse le 19 nov. 2008 à 09:24
Bonjour,
Je souhaite tester des lignes dans un fichier. Je place le tout dans un tableau avant de faire le teste.
exemple de ligne dans mon fichier :
toto
Je veux que : s'il y a toto, return vrai
s'il y a toto+ quelque chose après, return faux
La condition dans le programme est :
for ( 0 .. $#tableau ) {
until ($tableau[$_] =~ /toto/ ) {
print " ERREUR \n";
exit;
}
}
Ceci ne marche pas, car si j'ai totoi, il n'y a pas d'erreur.
J'ai essayé avec \ à la fin mais ca ne fonctionne pas.
Pouvez vous m'aider?
Lire la suite 

[PERL] regexp »

1 réponses
Réponse
+0
moins plus
Pour ceux qui cherchent, il faut mettre $
until ($tableau[$_] =~ /toto$/

a+
Ajouter un commentaire
Ce document intitulé « [PERL] regexp » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
5 extensions si vous voulez revenir à l'ancien Facebook