@in = map { $uclc eq 'lc' ? lc : uc } @in;