my $rows = $sth->fetchall_arrayref();
my $num_rows = @$rows;
foreach my $row (@$rows) {
   ...
}