What makes it unfair is the my $r = rand ($j);
That's what I meant by "re-pick".
In reply to Re^8: Array problem by BrowserUk in thread Array problem by Anonymous Monk