$sth = $dbh->prepare($sql);
while (my @results = $sth->fetchrow_array) {
    do_something(@results)
}
my $count = $sth->rows();