Re: unsorted list

This is an archived low-energy page for bots and other anonmyous visitors. Please sign up if you are a human and want to interact.

You can use rand within the sort code.

@stuff = qw[ cat dog pig cow ]; 
print "$_\n" for sort { rand() <=> rand() } @stuff
[download]

Update. I have the (theoretical) feeling that this trick may cause an infinite loop when used with a large array, but a few tests I did returned nothing suspicious.

HTH

Comment on Re: unsorted list Download Code

Replies are listed 'Best First'.
Re^2: unsorted list by Roy Johnson (Monsignor) on Apr 24, 2005 at 08:55 UTC
No infinite loop, but Is this a fair shuffle? Caution: Contents may have been coded under pressure.	[reply]
Re^2: unsorted list by merlyn (Sage) on Apr 24, 2005 at 09:32 UTC
In older Perl versions, inconsistent results from the sort block could produce core dumps or duplicated values. I don't believe modern Perl ever does that, but it's still not a way to get a fair sort. -- Randal L. Schwartz, Perl hacker Be sure to read my standard disclaimer if this is a reply.	[reply]

• hippo

‥ epoptai's answer Re: how do I set a cookie and redirect was blessed by hippo!

• erzuuli

‥ Anonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.


Welcome to the Monastery
	PerlMonks