Você pode usar a função fetchall_arrayref que aceita um argumento 'maxrows':
while (my $data = $dbc->fetchall_arrayref(undef, 10000)) {
for my $row( @{$data} ) {
$report->process_record($row);
}
}
Você também pode consultar o RowCacheSize propriedade que tenta controlar quantos registros são retornados em uma busca do seu driver.
