Discussion :

[gege2061]

Bonjour,
j'ai transformer un fichier en une chaîne de caractère, maintenant je doit découper cette chaîne en sous-chaîne suivant une expression régulière. Le problème vient du fait que j'ai plus de 9 motifs, donc impossible d'utiliser les variables $1...$9 pour répupérer mes motifs. Comment puis-je faire ?

Merci

[2Eurocents]

Ton motif n'est pas utilisable avec un split ?

Sinon, si tu as plus de dix parenthèses mémorisantes ou que tu fais une recherche globale (option g), plutot que d'utiliser les $1 à $9, tu as la solution de récupérer le résultat des matches de la regexp :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my @matches = ($chaine =~ m/motif_avec_plein_de_parenthèses/g);

Voici un petit exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
my $ch='1-2-3-4-5-6/7/88*9*41+65+564-654';
my @m=($ch =~ m/(\d*)/g);
$,=' ';
print @m;
print "\n";

[gege2061]

Ton motif n'est pas utilisable avec un split ?

En fait, au départ c'est une page HTML et je doit récupérer des info contenu dans un tableau donc il faut que je récupère chaque ligne (comprise en <th><tr>*</tr></th> je croi) mais les balises peuvent être sur une même ligne ou sur des lignes différentes (donc impossible de faire une annalyse ligne par ligne du fichier).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my @matches = ($chaine =~ m/motif_avec_plein_de_parenthèses/g);

Tout simplement c'est ce qu'il me faut, beaucoup