for my $num (@a) { push @hashes,{} }