[

              {
                flinstones => "fred",
                jetsons    => "george"
              },
              {
                flinstones => "fred",
                jetsons    => "jane"
              },
              {
                flinstones => "barney",
                jetsons    => "george"
              },
              {
                flinstones => "barney",
                jetsons    => "jane"
              },

];

##</code><code>##

use Data::Dumper;

use strict;
use warnings;

my $blah = 
{

              {
                flinstones => "fred",
                jetsons    => "george"
              },
              {
                flinstones => "fred",
                jetsons    => "jane"
              },
              {
                flinstones => "barney",
                jetsons    => "george"
              },
              {
                flinstones => "barney",
                jetsons    => "jane"
              },

};

print Dumper($blah);

##</code><code>##

$VAR1 = {
          'HASH(0x224ef8)' => {
                                'flinstones' => 'fred',
                                'jetsons' => 'jane'
                              },
          'HASH(0x1876560)' => {
                                 'flinstones' => 'barney',
                                 'jetsons' => 'jane'
                               }
        };