my @array = qw(0 a b c e 1 2 3 4 5 3 f w); my $len = 4; print oxTable->new([ map [splice @array,0,$len], 0..$#array/$len ]); #### +--+--+--+--+ |0 |a |b |c | |e |1 |2 |3 | |4 |5 |3 |f | |w | | | | +--+--+--+--+