for my $aref_acc_num (values %$acc_num) {