Rechercher : dans
Par :

[PERL] regexp

Dernière réponse le 19 nov 2008 à 09:24:53 wafa_o, le 19 nov 2008 à 08:50:51 
 Signaler ce message aux modérateurs

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?

Configuration: Windows XP
Internet Explorer 6.0

Meilleures réponses pour « [PERL] regexp » dans :
Javascript - L'objet RegExp VoirLes particularités de l'objet RegExp L'objet RegExp est un objet permettant de manipuler des expressions régulières, c'est-à-dire des modèles créés à l'aide de caractères ASCII permettant de manipuler des chaînes de caractères, afin de trouver des...
Perl - Les fichiers VoirLa notion de filehandle On appelle filehandle (traduisez descripteur de fichier), dans un programme Perl, le nom permettant de manipuler une connexion d'entrée-sortie (les entrées-sorties standards vues précédemment sont connues par les filehandles...
Les variables avec Perl VoirConcept de variable avec Perl Une variable est un objet repéré par son nom, pouvant contenir des données, qui pourront être modifiées lors de l'exécution du programme. Les variables en langage Perl peuvent être de trois...

1

 wafa_o, le 19 nov 2008 à 09:24:53

Pour ceux qui cherchent, il faut mettre $
until ($tableau[$_] =~ /toto$/

a+

Répondre à wafa_o