不知道是linux与windows的区别还是什么原因？？

fly_in_thesky

我想处理这样的文本：
文本a.txt：
A  hdaiu  dhasidhi 1   5
B  dhas    dhaoo   6    12
B  djasoj   dhao   13   20
文本b.txt：
A 1
B 8
B 15
目的是生成这样的文件：
B 8
B 15
即提取b中第一列与a中的相同且第二列在a文件的第四列和第五列两个数字间的。
自己写的程序如下：
#!/usr/bin/perl -w
open FILE,"a.txt";
open VI,"b.txt";

while(<FILE>{
   chomp;
   @hello=split;
   $a=$hello[3];
   $b=$hello[4];
   $c=$hello[0];
   push @li,$c;
   push @hi,$a;
   push @ji,$b;
   }
   while (<VI>{
  chomp；
   @name=split;
   for($j=0;$j<=$#hi;$j++){
        if （($name[0] eq $li[$j]）&&（$hi[$j]<$name[1]）&&（$name[1]<$ji[$j])）{    #此处
                 $number++;
       print   $_,"\n";
     }
   }
  }print  "CDSnumber\n";
     close FILE;
     close VI;
         该程序在windows下检测运行正常，但是在linux上运行，如果使用-w会在#此处的位置报错如下：
        Use of uninitialized value in string eq at CDS_dui.pl line 19, <VI> line 1.
     如果去掉-w，程序会运行，但是top后的RES状态会不再增加，生成的文件也不全，似乎有点无限的运行下去的意思。
实在没找到错误，求指点！！

q1208c

为啥你们都这么喜欢用 $_ 呢?

你有个变量没有初始化. 可我看不懂你的程序.