while (my $row = $sth->fetch_arrayref()) {
   ...
}