$t = time; ++$_->{a} for @AoH; say time() - $t;; 0.931627988815308