And of course there's a module on CPAN to do this for you: Array::Dissect. It splits an array into arrays of given size.

Hope this helps, -gjb-