来自数据库的perl foreach数组结果

Question

我从数据库中获得了一些select结果（如图片上所示）。

我需要为foreach

做id周期

它必须看起来像这样

foreach () {
   if ($status==1) {
      if ($process_id ~~ @some_array) {
    #do something
   }
}

每个周期怎么做？据我所知，我需要从散列形式$ref = $sth->fetchrow_hashref的基础中获得结果，但我从未与他合作过，我的尝试都没有成功。请帮帮我。

Answer 1

fetchrow_array你需要什么？

while (my ($id, $status, $process_id, $error_count) = $sth->fetchrow_array) {
    if (1 == $status and grep $_ == $process_id, @some_array) {
        # do something
    }
}