my $rows = 0;
while( my @result = $sth->fetchrow_array() ) {
  last if $rows++ >= 10;
  ...
}

$sth->finish();
[download]