Re: Adding rows of data

The existing $data is a reference to an array containing an array hashes, and the data you are adding are arrays being added to the top-level array. This is why your data structure looks odd (see below).

Data, as presented:

$data = \[
            [
              'City Name',
              'Last Name',
              'First Name',
              'Address'
            ],
            [
              '',
              '',
              '',
              ''
            ],
            [
              {
                'FIRST_NAME' => 'John',
                'CITY' => 'San Frans',
                'LAST_NAME' => 'Doe',
                'ADDRESS' => '100 Main St.'
              }
            ]
          ];
[download]

If you change the assignment in _test to the form my @data = ( ... );, I believe it will appear more as you expect. (It does, however, mean that the elements of the array differ in type.)

Data, after suggested change:

$data = \[
            [
              'City Name',
              'Last Name',
              'First Name',
              'Address'
            ],
            [
              '',
              '',
              '',
              ''
            ],
            {
              'FIRST_NAME' => 'John',
              'CITY' => 'San Frans',
              'LAST_NAME' => 'Doe',
              'ADDRESS' => '100 Main St.'
            }
          ];
[download]

Hope that helps.

Update: 2014-12-02

Based on that premise, then, changing the unshift() line in your code to unshift @{ $data }[0], @{ $header_row }; appears to have your desired effect (see below).

Data, after change suggestion 2:

$data = \[
            [
              [
                'City Name',
                'Last Name',
                'First Name',
                'Address'
              ],
              [
                '',
                '',
                '',
                ''
              ],
              {
                'FIRST_NAME' => 'John',
                'CITY' => 'San Frans',
                'LAST_NAME' => 'Doe',
                'ADDRESS' => '100 Main St.'
              }
            ]
          ];
[download]

Comment on Re: Adding rows of data Select or Download Code

Replies are listed 'Best First'.
Re^2: Adding rows of data by Anonymous Monk on Dec 02, 2014 at 16:15 UTC
That’s my problem, I can't change the data in _test, I am trying to change the data in `$header_row` to match what is coming from _test.	[reply] [d/l]
Re^3: Adding rows of data by Anonymous Monk on Dec 02, 2014 at 16:29 UTC
Well, then at least add a hash reference instead of two array references to match data structure from your _test() ... `... push @{ $header_row } , [ { 'City Name' => '' , ... } ] ; ...` [download] BTW\|FWIW, your headers\|key names are different in letter case & spellings.	[reply] [d/l]
Re^4: Adding rows of data by Anonymous Monk on Dec 02, 2014 at 16:56 UTC
That should work for that kind of data structure, my final data structure goal is to have it as this once printed: `my $data_test = [ [ 'City Name', 'Last Name', 'First Name', 'Address', ], [ '', '', '', '', ], [ 'San Frans', 'Doe', 'Jonh', '100 Main Street', ], ];` [download]	[reply] [d/l]