To shuffle columns (assuming rectangular data):
my @idx= 0..$#{$aoa[0]}; Shuffle( \@idx ); for my $av ( @aoa ) { @$av= @$av[@idx]; }
- tye
In reply to Re: Splice equivalent for a two-dimensional arrays (col shuffle)
by tye
in thread Splice equivalent for a two-dimensional arrays
by a11
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |