do {
    while($d = $sth->fetch) {
        ... do something with the data
    }
} while($sth->{syb_more_results});