perl  -E "%c = (3=>5);keys(%c) = 33;say  scalar(%c)"
1/64