use strict;
use warnings;

my @bigArry = 0 .. 99;
my $max     = 17;
my @sliced;

push @sliced, [ splice @bigArry, 0, $max ] while @bigArry;

use Data::Dumper;
print Dumper \@sliced;
[download]

PerlMonks parthenogenetically spawned by Tim Vroom.
PerlMonks somehow became entangled with The Perl Foundation.
Wonderful Web Servers and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.