in reply to Re: How do I shuffle an array?
in thread How do I shuffle an array?

Independet way: 
  my @data = 0..51;
  my @cards = sort { (-1,1)[rand(2)] } @data ;

[download]

Graciliano M. P.
"The creativity is the expression of the liberty".

In Section Seekers of Perl Wisdom