$db->do("declare imprecator CURSOR FOR select * from test");
    $c = $db->prepare("FETCH 100 FROM imprecator")

    for (1..10) {   # I have a more robust example somewhere
        $c->execute();
        print Data::Dumper::Dumper($c->fetchall_arrayref())
    }