If you just want to print it out to visualise the data for exploration, debugging etc., you don't need to go to the trouble of exploding it yourself - just use Data::Dumper which can print (nearly) any Perl data structure:
use strict;
use Data::Dumper;
my @ahoa=( ... );
print Dumper \@ahoa;