时间戳

首页 > 解决方案 > Perl 中的数组问题

arrays - Perl 中的数组问题

问题描述

我是 Perl 新手，现在在 Perl 中遇到以下数组处理问题。

while ( ($stu_id,$gate_nbr) = $cursor->fetchrow() )
{
    foreach my $stu_details (@stu_dbs)
    {
        my($stu_no,$sch_id,$lnk_svr_tx) = @$stu_details;
        if ($stu_no == $stu_id)
        {
            SortSchRec($stu_no,$gate_nbr,$sch_id,$sch_tx);
        }
    }
    $log->writeI("Stud ID:". $stu_id );
    $log->writeI("Gate ID:". $gate_nbr);
}

$cursor->finish();

上面的代码处理第一个数组值，但不选择下一个数组值。你能告诉我这个 foreach 语句有什么问题以及如何解决它吗？

标签： arraysperlforeach

解决方案

谢谢zdim，我发现了问题..已经在以前的函数中打开了一个游标作为全局变量，但在两者之间引入了这个..更改了游标变量名称，现在我可以执行脚本了。

推荐阅读