for my $aref ( @$AoAref ) { print "\t [ @$aref ],"; # not exactly sure what i'm doing here... }