my $array_1 = [ 1, 2, 3 ];   # 1d
my $array_2 = [ [1, 2, 3], [1, 2, 3], [1, 2, 3] ]; #2d
my $array_3 = [
  [ [1, 2, 3], [1, 2, 3], [1, 2, 3] ],
  [ [1, 2, 3], [1, 2, 3], [1, 2, 3] ],
  [ [1, 2, 3], [1, 2, 3], [1, 2, 3] ],
];                                           # 3d
... etc.