[langage] expression régulière - verif caractères
Bonjour,
Je n'ai jamais pratiqué PERL, mais je me retrouve avec un bout de code à modifier !! J'ai essayé plein de trucs mais ça ne marche pas...
Mon problème : je dois vérifier que les lignes de mon fichier se composent de 2 lettres puis 3 chiffres puis du texte, alors qu'auparavant les lignes se composaient de 1 ou 2 chiffres puis 3 chifres puis du texte.
Voilà la ligne de code d'origine :
Code:
if($ligne !~ /\d{4,5}\,.*\,.*\,.*\,.*\,.*\,.*/s) {printf(ERREURS "$ligne\n"); $err=1; next;}
et voilà ce que j'ai essayé :
Code:
if($ligne !~ /.*\,\d{3}\,.*\,.*\,.*\,.*\,.*\,.*/s) {printf(ERREURS "$ligne\n"); $err=1; next;}
mais ça marche pas puisque ça écrit dans mon fichier "ERREURS" :cry:
donc si quelqu'un peut me dire comment on fait...
Re: [débutant] expression régulière - verif caractères
Citation:
Envoyé par lexav
Bonjour,
Je n'ai jamais pratiqué PERL, mais je me retrouve avec un bout de code à modifier !! J'ai essayé plein de trucs mais ça ne marche pas...
Mon problème : je dois vérifier que les lignes de mon fichier se composent de 2 lettres puis 3 chiffres puis du texte, alors qu'auparavant les lignes se composaient de 1 ou 2 chiffres puis 3 chifres puis du texte.
La regexp marche avec le format de ligne suivant :
az345daslplsda sdalpsd[
Code:
1
2
3
4
|
if (!($ligne =~ /\w{2}\d{3}.*/)) {
print "Error\n";
} |
J'espere que ca vous convient.
