while( defined $sth->fetch) {
 # do something with fetched data
}
if($sth->err) {
# handle error
}
else {
# no more data
}