while ( @an = $sth->fetchrow_array) { push (@OrderedQuestions, \@an); }