in reply to Fisher-Yates Shuffle

There was a thread on comp.lang.perl.misc about this awhile back.