Je n'ai pas très bien compris ton exemple, donc suivant ce que tu veux faire (avec une expression réguliere tout simple), pour récupérer le résultat dans un array:
my $a="abc def ghf";
my @resultats = ($a =~ m/([\w_]+)/g);
foreach my $element (@resultats) {
print "un element=$element\n";
# ton traitement
}
Ou plus simplement pour l'utiliser directement dans une boucle:
my $a="abc def ghf";
foreach my $element ($a=~m/([\w_]+)/g) {
print "un element=$element\n";
# ton traitement
}
# regexp
Posté par sylvain cresto (site web personnel) . En réponse au message Récupérer des captures multiples. Évalué à 3.
my $a="abc def ghf";
my @resultats = ($a =~ m/([\w_]+)/g);
foreach my $element (@resultats) {
print "un element=$element\n";
# ton traitement
}
Ou plus simplement pour l'utiliser directement dans une boucle:
my $a="abc def ghf";
foreach my $element ($a=~m/([\w_]+)/g) {
print "un element=$element\n";
# ton traitement
}