while (my ($result) = @$rowcache ? shift(@$rowcache) : ())