perl Utilisation de la valeur non initialisée $ _ dans la chaîne eq

Question

Pourquoi j'ai parfois cette erreur? Utilisation de la valeur non initialisée $ _ dans la chaîne eq

if (defined($infos->{"valeur_exclude"}) && 
grep { $number eq $_ } @{$infos->{"valeur_exclude"}}); 

Merci

Answer 1

Peut-être, au lieu regexp EQ?

mon @foo = grep {!/^ # /} @bar;

http://perldoc.perl.org/functions/grep.html

Answer 2

Le tableau contient quelque part undef. Vérifiez defined avant de comparer:

grep { defined && $number eq $_ }