Recherche:

Ok, donc tu veux faire exactement ce que fait le code ci-dessus... Voilà un template pré-maché, essaie de faire un effort la prochaine fois :



#! /usr/bin/perl
use strict; use warnings;

use...

Ton dernier post est d'une clarté boueuse à souhait... :roll:

Sinon pour ce qui est de la question précédente, tu remarqueras que le bout de code qu'on t'a donné contient une seule fonction...

Evidemment que ça marche ! Il assemble les alternatives que tu lui donnes et il factorise au maximum, puis il te recrache la regex résultante. Il donne donc de meilleurs résultat qu'un humain pour...

Tu sais que tu peux utiliser d'autres délimiteurs que "/" pour ta regex (à condition de bien mettre le m devant), pour le coup ça facilite nettement la relecture d'icelle :


$result =~...