连续使用相同文件句柄的问题

代码如下：
    open (FILE, "temp_file") || die;

    my @lines1 = <FILE>;
    my @lines2 = <FILE>;

    foreach(@lines1) {
        print "1 file is $_";
    }

    foreach(@lines2) {
        print "2 file is $_";
    }
只有line1能打印，line2打印不出来。不允许连续使用相同文件句柄么？多谢！

FILE句柄已经被读取完毕, 那个"位置指针"指在了FILE的最后面了

可以这样吧@line1=@line2=<FILE>;
或者perldoc -f seek

非常感谢，没有理解文件句柄的含义...