Re^2: Build tree data structure from DB (flat) data; function golf

[perlfan]

I was going to suggest a change in data structure as well.

my $input = [
  {
    'team'       => 'A-Team',

    'employee'   => 'Face',
    'work_day'   => '2006-08-28',
    'other_data' => '123456789',
  },
  {
    'team'       => 'A-Team',
    'employee'   => 'Murdock',
    'work_day'   => '2006-08-28',
    'other_data' => '123456789',
  },
  {
    'team'       => 'Military',
    'employee'   => 'Decker',
    'work_day'   => '2006-08-28',
    'other_data' => '123456789',
  },
];

To:

my %input = (
    'A-Team' => {
         {
          'employee'   => 'Face',
          'work_day'   => '2006-08-28',
          'other_data' => '123456789',
         },
         {
          'employee'   => 'Murdock',
          'work_day'   => '2006-08-28',
          'other_data' => '123456789',
         },
      },
   'Military' => {
         {
          'employee'   => 'Decker',
          'work_day'   => '2006-08-28',
          'other_data' => '123456789',
         },
      },
   );

[imp]

The structure's ideal format depends on how it will be used

gryphon's output seems like something intended for HTML::Template, which only accepts scalars or arrays of hashrefs unfortunately. It wouldn't be able to iterate over your proposed structure.