如何将sql查询的结果存放到数组中并依次取出？

use dbi;

$dbh = dbi->connect（'dbi:driver:database', 'username', 'auth',
            { raiseerror => 1, autocommit => 1});

$dbh->do（$non_select_sql_statement);

$results = $dbh->selectall_arrayref（$select_sql_statement);

$sth = $dbh->prepare（$sql_select_statement);
$sth->ＥＸＥＣute（ );
while （@row = $sth->fetchrow_array) {
    # ...
}

$dbh->disconnect（ );