# New Ticket Created by Moritz Lenz
# Please include the string: [perl #109586]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=109586 >
17:26 < TimToady> nom: say (^2**64).pick.fmt('%64b')
17:26 <+p6eval> nom ce5cca:
OUTPUT«1010100001010011111100101101011101010001000000010000000000000000»
17:27 < TimToady> pick from a large range might need to generate more
entropy than a single standard rand call provides; note
the trailing 0's above
Repeated execution shows that it indeed always ends with many 0's. So,
not random enough. http://xkcd.com/221/ applies :-)