Help for this page

Select Code to Download


  1. or download this
    @b = ( @a, 11, 32 );

...
my @sizes = ( scalar(@a), scalar(@b), scalar(@c) );

my @where_to = qw/a b c/;
  2. or download this
    use List::Util 'shuffle';
@shuffled = shuffle(@list);
  3. or download this
    use XXX; 
use List::Util;
...
(@a[0..$#a],@b[0..$#b],@c[0..$#c]) = List::Util::shuffle(@a,@b,@c);

XXX [\@a, \@b, \@c]'