$ARRAY1 = [
            ( undef ) x 2,
            'line 2',
            'line 0',
            'line 1',
            undef,
            'new line',
            ( undef ) x 2,
            'new line'
          ];


$ARRAY1 = [
            ( undef ) x 3,
            [
              ( undef ) x 2,
              'line 0',
              undef,
              'line 2',
              undef,
              'newer line'
            ],
            [
              'new line',
              'line 5',
              undef,
              'line 1'
            ]
          ];


$ARRAY1 = [
            ( undef ) x 2,
            [
              ( undef ) x 3,
              [
                ( undef ) x 2,
                'new line'
              ]
            ],
            undef,
            [
              ( undef ) x 2,
              [
                ( undef ) x 2,
                'line 2'
              ],
              [
                undef,
                'line 1',
                'line 0'
              ]
            ],
            undef,
            [
              ( undef ) x 2,
              [
                undef,
                'newer line'
              ]
            ]
          ];