push(@{$a->{a}[0]}, {a => \@a, b => [ qw(a b c) ]});
こういうのは好き?