if(grep $name eq $_, @names) ...