Bonjour à tous,
Petite enigme Expression Régulière...
Je cherche, en une seule expression régulière, repérer une séquence dans une phrase, y appliquer une fonction perl, et la retourner.
Ainsi, avec la phrase "'La lettre est <ascii>65</ascii>", je veux récupérer "A"
(et non "La lettre est A")
De cette façon, ma variable contient bien "A", mais je suis passé par 2 expressions. Je cherche un moyen de l'obtenir directement via un ($lettre) = ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 $_= ' La lettre est <ascii>65</ascii> '; ($lettre) = /<ascii>(\d*)<\/ascii>/; $lettre =~ s/(.*)/chr($1)/eg; print "$lettre";
Merci de votre aide.
Partager