in reply to How to not print the same random number

Here is one way: 
perl -MList::Util=shuffle -e 'print "@{[shuffle(1..10)]}"'

[download]
Boris

Replies are listed 'Best First'.
Re^2: How to not print the same random number
by shotgunefx (Parson) on Mar 04, 2006 at 11:01 UTC
    While fine for small ranges, won't that be a hog on larger number ranges?
    update I understand that the poster is only looking for 1-10, just seemed the better way to teach. Opinions?

    -Lee
    "To be civilized is to deny one's nature."
[reply]
      Yes sure, the array with all numbers is build and shuffled. On the other hand, hash solutions require more memory and more cpu power they build the same array but slower. A hash is a better choice, if you use only some number out of a large range. For really really much numbers a database is my best choice.
      Boris
[reply]
        That's what I figured. I haven't kept up lately, didn't know if some lazy evaluation had snuck in there ;)

        -Lee
        "To be civilized is to deny one's nature."
[reply]
      Not much of a hog. Storing the numbers already picked in a hash would be about as bad. (I'm not sure how many copies of the list the shuffle approach will end up having.)

      But anyway, if you go with what I understand to be your idea of repeatedly generating random numbers until you find one not yet in a hash, you'll end up taking a very very long time finding the last few numbers if the limit is, say, 1000000.

[reply]
        Well, I suppose I should have been more clear. I would think for many applications, the number of numbers picked compared to the number range would be relatively small.

        So I guess the proper answer would be, "it depends".

        -Lee
        "To be civilized is to deny one's nature."
[reply]

      The question becomes "are you going to use all the numbers in that range?" If so, you have to remember them all regardless of your approach. If no, then you could save memory by just tracking what you use... but this then becomes more processor-expensive.

[reply]
        On the plus side, once you've "bought it", the cost is pretty much constant.

        -Lee
        "To be civilized is to deny one's nature."
[reply]

In Section Seekers of Perl Wisdom