Quand tu as un problème de ce style, essaye toujours de réduire ton expression régulière jusqu'à ce qu'elle n'échoue plus. Tu peux alors identifier d'après la dernière suppression, ce qui a posé problème.
Dans ton cas particulier ici présent, pourquoi ne pas commencer par découper la ligne en éléments de tableaux séparés par une tabulation :
my ($QUERY, @infos) = split /\t/, $seq;
Puis à appliquer des expressions régulières plus simples sur chacun des éléments du tableau @infos qui te sont utiles ?
Partager