push @{ $AoA[$c] },$$one_num, $$account_num, $name, $new_name, $plano, $passdate, $todays_date, $descont, $firm, $value, $thetotal, $commited;