use List::Util 'shuffle'; my @A = qw- 1 2 3 4 -; @A = shuffle @A; say "@A"; [download]
In reply to Re: Very Large Arrays by lidden in thread Very Large Arrays by Desade