Bonjour,

Je souhaiterai réaliser un script qui m'ouvre un fichier dans le quel il y aurait différente ligne et ne récupérer que les lignes qui n'ont pas les mots suivants : erreur, error...

Pour cela, j'avais pensé aux programme suivant :

quel est la négation pour " =~ " ?


open (FIC_READ, "<$Fichier") || die "Ouverture impossible du fichier $Fichier: $!";

my @GestionLigneExclu=("erreur","error");

while ($Ligne = <FIC_READ> )
{
if (grep { $Ligne =~ m/$_/g } @GestionLigneExclu)
{
print "traitement $Ligne \n";
}
else
{
print "erreur $Ligne \n";
}


}
close (FIC_READ);