@age_ref = (\$AoH[0]{age},\$AoH[2]{age});
while (@age_ref = \$sth->fetchrow_array)