@allnames = grep(!$saw{lc()}++, @names);
# or
@allnames = grep(!$saw{lc $_}++, @names);