@hash{map lc, @k} =
  map lc, delete @hash{@k = keys %hash};