How to quickly produce 100,000 of, the 2.658e+4283 combinations of, 1,553 values:
use List::Util qw[ shuffle ];
my @data = 1 .. 1553;;
my @results = map[ shuffle @data ], 1.. 1e5;
Done.
With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.