关于Perl创建一个可读可写的文件，怎么读不出内容来了？谢谢

love1314sea

刚学习Perl语言，请教：
#!/usr/bin/perl
open (FILE, "+>>a.txt") or die "$!";
while($line=<FILE>)
{
print "$line";
}

a.txt 文件内容：
Steve Blenheim
Betty Boop
Lori Gortz
Sir Lancelot
Norma Cord
Jon DeLoach
Karen Evich

程序运行后，不报错，无输出。这是什么原因啊！

yybmsrs

while之前加seek FILE,0,0;

初学就不要用这种形式

zhlong8

读文件就用 open my $fh, '<', 'file.name' or die $!; ，几年了只要不是在命令行直接执行的代码我都这么写，从来不会出问题

zhlong8

这还是在最开始看 Learning Perl 时学会的

love1314sea

回复 2# yybmsrs


    是的哦，多谢

love1314sea

回复 4# zhlong8


  多谢！

gaoyang636

用错操作符了，你想打开read/write mode，进行读操作，那么应该是 "+<"； 这里的“+>>”是用于append的

wxlfh

回复 3# zhlong8


    的确，三参数形式的 open 调用不容易出错，也比较安全。

weininglzu

同意7楼意见