传递'+ >>时Perl不读取文件

Question

我试图将文件的内容放入一个数组中以进行grepping,但由于某种原因,当我传递'+ >>'参数时它没有这样做.但是,当我使用不同的参数打开同一个文件的两个单独的文件句柄时,它可以工作

这有效:

open( FILEHANDLE, '<', $file ) or $file_not_found = 1;
open( APPENDFH, '>>', $file );
my @file_list = <FILEHANDLE>;
print("This is my file list @file_list \n");

打印:

This is my file list 2015-11-06 11:17:57Example

这不是:

open( FILEHANDLE, '+>>', $file ) or $file_not_found = 1;
my @file_list = <FILEHANDLE>;
print("This is my file list @file_list \n");

打印:

This is my file list

Answer 1

+>>最后打开文件.你需要回到开头阅读它:

seek FILEHANDLE, 0, 0;

但是您可以直接打开文件+<.