Bonjour

il est possible d'améliorer l'expression régulière en supprimant les .* qui ne servent à rien
if ( ($record =~ /${patternWarning}/i)
puisque perl cherche déjà le pattern sur toute la...