while ( $someVar = $sth->fetch ) {
   do (
      something...
   ) while ( $sth->{syb_more_results} );