高分求救.PERL简单的文件及数据库操作

HF.SKY000

sub get_ci_sz{
        my @ci_sz;
        my @ne_id_sz;
        my $sql_sz="select count(*) a,c.ci from unicom:hb_cm_cell a ,unicom:ne_bsc b ,unicom:ne_cell c where a.type1=b.china_name and c.city_id=b.city_id and c.ci=a.ci   and b.city_id='114' and c.n_confirm<>1 group by 2 having count(*)>1";
        $sth=$dbh->prepare($sql_sz);
        $sth->execute();
        while(my $line=$sth->fetchrow_array){
                @ci_sz=$line;
                my $s="select ne_id from ne_cell where n_confirm<>1 and ci=@ci_sz and city_id='114' order by 1";
                $sth=$dbh->prepare($s);
                $sth->execute();
                while(my @row=$sth->fetchrow_array){
                print $row[0],"\n";
                }
        }
        }

描述:本想将第一个SQL查询结果@ci_sz作为第二个SQL查询的条件.但是从打印的结果来看.引入的参数只是第一个SQL的最后一个值.也就是说:只是@CI_SZ的最后一个数值.数组中的其它数值并没有引入到第二个查询SQL中,请高手帮忙.

HF.SKY000

效果是一样的

HF.SKY000

还是一样的,