$search = lc($search);
grep lc($_) eq $search, @arr;