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

##</code><code>##

while (my $ran = $sth->fetchrow_arrayref) {
    push (@OrderedQuestions, $ran);
}