while($row = shift(@$rowcache) || shift(@{$rowcache=$sth->fetchall_arrayref(undef, $max_rows)})) { ... }