my %HoH = map { delete $_->{FirstNum} => $_ } @AoH;