regexp : capture multiple

bonjour

je souhaite trouver des chaînes du type "0000:81 B2 B2 33 36 B2 35 39 B8 B8 39 30 B1", donc 0000:81 suivi de 12 blocs de 2 caractères séparés par un espace, le 2e caractère de chaque bloc étant un chiffre. Ce sont ces chiffres qui m'intéressent pour la suite du traitement.

Naïvement, je code :
if(/0000: 81(?: .(\d)){12}/) { print "$1$2 $3$4 $5$6 $7$8 $9$10 $11$12\n"; }

Pas de chance, ça ne me sort que le 12e chiffre. Apparemment, à chaque fois qu'il trouve une des 12 occurences du motif, il écrase $1 avec le nouveau chiffre trouvé.

Je peux écrire 12 fois mon motif mais c'est contraire à l'élégance la plus élémentaire.

Merci d'avance pour vos idées...

..

Pourquoi n'utilises-tu pas un opérateur de répétition comme *, +, ou les accolades ?

Ben c'est ce que je fais dans :

(/0000: 81(?: .(\d)){12}/)

Pour moi le {12} fait chercher 12x le motif entre parenthèses qui précède :

(?: .(\d))

donc un espace, un caractère, un chiffre.
Ca ça marche bien. Ce qui ne marche pas, c'est l' "enregistrement" des 12 chiffres par (\d) : au lieu de me les mettre dans $1, $2...$12, il ne met que le dernier dans $1 et rien dans $2...$12.

En espérant que c'est plus clair comme ça....

Erratum. J'ai parlé beaucoup trop vite...

Je n'ai pas souvenir que ce soit possible de répéter un matching.
Par contre, tu peux t'en sortir facilement avec map :

Code:

---

1 2 3

my $s = "0000:81 B2 B2 33 36 B2 35 39 B8 B8 39 30 B1"; my @l = map { /^.(\d)$/ } split( ' ', $s );

---

merci :lol: