use strict;
use Data::Dumper;

my @ahoa=( ... );

print Dumper \@ahoa;