#!/usr/bin/perl -w
use strict;
use Data::Dumper;

my @aoh;
$aoh[0] = { key => 'value'};
print Dumper(@aoh);