delete @keep_ids{ map { $_->{id} } @AoH_one };

print Dumper (%keep_ids);