$ time perl multisets.pl count = 1 0, 2, 3, count = 2 0, 0, 0, 2, 0, 3, 2, 2, 2, 3, 3, 3, count = 3 0, 0, 0, 0, 0, 2, 0, 0, 3, 0, 2, 2, 0, 2, 3, 0, 3, 3, 2, 2, 2, 2, 2, 3, 2, 3, 3, 3, 3, 3, count = 4 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 3, 0, 0, 2, 2, 0, 0, 2, 3, 0, 0, 3, 3, 0, 2, 2, 2, 0, 2, 2, 3, 0, 2, 3, 3, 0, 3, 3, 3, 2, 2, 2, 2, 2, 2, 2, 3, 2, 2, 3, 3, 2, 3, 3, 3, 3, 3, 3, 3, count = 7 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 2, 2, . . . (abbreviated) 2, 2, 2, 3, 3, 3, 3, 3, 2, 2, 3, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, real 0m0.048s user 0m0.015s sys 0m0.000s