1234567891011121314151617181920212223242526272829303132333435363738394041
format_c@linux:~> perluse Data::Dumper;my @array;for (0..4) { push @array,[0..3];}print Dumper(\@array);$VAR1 = [ [ 0, 1, 2, 3 ], [ 0, 1, 2, 3 ], [ 0, 1, 2, 3 ], [ 0, 1, 2, 3 ], [ 0, 1, 2, 3 ] ];format_c@linux:~>