> I'm saying "division" is now defined such that when the numerator is > a hash(-ref), the result is the set of values associated with the > denominator. I've never tried to divide a hash or hashref by > something without it being a bug.
Right...in Perl 5.
In Perl 6, a hash in a numeric context returns the number of entries it contains. So I can readily imagine:
sub decimate_hash (%hash is rw) { for 1..%hash/10 { delete %hash{ pick any(keys %hash) }; } }
Damian