文件句柄可以是数组吗？

用数组当文件句柄，发现不行。不知道是我代码写错了，还是就是不能这样用。

代码如下：
            my @IN;
            for($z=1;$z<=21;$z+=4)
                    {
                open($IN[$z],"</home/sciwmj/workspace/R/dssp/dssp_kappa/total_dssp_kappa_$z.txt") or die "$!";
                    }
            while(defined($line1=<$IN[1]>))
                {  $line5=<$IN[5]>;
                   $line9=<$IN[9]>;
                   $line13=<$IN[13]>;
                   $line17=<$IN[17]>;
                        $line21=<$IN[21]>;
                        chomp $line1;chomp $line5;chomp $line9;chomp $line13;chomp $line17;chomp $line21;
                        print $out "$line1"."            $line5"."            $line9"."            $line13"."            $line17"."            $line21\n";
                  ｝
  结果打印出来都是GLOB(0x844eb50)            GLOB(0x84c4b40)            GLOB(0x84c4b70)            GLOB(0x84c4ba0)            GLOB(0x84c4bd0)            GLOB(0x84c4c00)
这个应该是内存地址吧？
用IO：：File也试过了，也是同样的结果。
有没有人说一下数组当文件句柄该怎么用。

$IN->[13];    ???