Bonjour a tous,


Dans mon logiciel, je dois recuperer une suite de 3 nombres, du type "5 12 14".

L'ancienne version du logiciel utilise une regex assez monstueuse:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
/[a-zA-Z]|\,|\<|\>|\=|\-|\+|\.|\_|\|\%|\#|\*|\@|\&|\?|\;|\:|\!|\|\|\|\^|\|\$|\|\~|\"|\'|\{|\(|\[|\`|\|\]|\)|\}/)

Celle ci fonctione, mais malheuresement pas sous perl 5.004.

J'ai donc penser a la remplacer par /(\d\s+)*/ qui fonctionne partout, mais repere aussi les @,#... alors qu'il me devrait pas.

Quelqu'un connait il une autre facon de proceder?


Merci.