my @charsWithNoUpperCase =
    @chars[grep { !defined @upChars[$_] } 0..$#upChars];