Petite expression rationnelle

17/02/2008 at 10:56 - [FR]

@(?:(?:".*?[^\\]")|(?:'.*?[^\\]')|(?:`.*?[^\\]`))|(?:\#((?:(?:".*?[^\\]")|(?:'.*?[^\\]')|
(?:`.*?[^\\]`)|[^"'`])+?)\#)@

omfg.png

Ceci est une petite expression rationnelle PERL que j'ai construit hier avec Quentin alors qu'on travaillait sur une bibliothèque SQL pour notre moteur web. Nous devions matcher tout bloc de code compris entre les tokens '#' et '#', mais ne pas compter les '#' qui apparaitraient dans des strings (et ce a l'intérieur ou a l'extérieur des blocs '# ... #'), sachant qu'une string est entourée de quotes, double-quotes ou backquotes, qui peuvent contenir ces mêmes caractères backslashés.

Par exemple, ceci devait matcher :

texte avant #une 'pomme\'verte#ou rouge' a croquer# texte après

et renvoyer :

une 'pomme\'verte#ou rouge' a croquer

En effet, le diese du milieu est dans une string, qui va de "pomme" à "rouge" , et ne doit pas être compté comme caractère de fin de bloc.

Voici le code php qui nous a permis de créer cette expression :

  1. $spl = "(?:'.*?[^\\\\]')"; // string between simple quotes
  2. $dbl = '(?:".*?[^\\\\]")'; // string between double quotes
  3. $bck = '(?:`.*?[^\\\\]`)'; // string between back quotes
  4. $string = $spl.'|'.$dbl.'|'.$bck; // a string block
  5. $diese = '\#((?:'.$string.'|[^"\'`])+?)\#'; // a # ... # block
  6. preg_match_all('@(?:'.$string.')|(?:'.$diese.')@', $content, $matches, PREG_OFFSET_CAPTURE);

Sympa, non ?