Help for this page
use strict; use warnings; ... local $" = q{, }; print qq{[ @$raSubArray ]\n}; }
[ 1, 2 ] [ 3, 4 ] [ 5, 6 ] [ 7, 8 ] [ 9 ]