Two Methods for Perl to read strings from files

1. Read all the content in the file into an array at a time (this method is suitable for small files ):

Copy codeThe Code is as follows: open (FILE, "filename") | die "can not open the file: $! ";
@ Filelist = <FILE>;

Foreach $ eachline (@ filelist ){
Chomp $ eachline;
}
Close FILE;
@ Filelist = <FILE>;

When the file is large, the error "out of memory" may occur.

2. Read and process one row from a file and one row at a time (it is more convenient to read large files ):

Copy codeThe Code is as follows: open (FILE, "filename") | die "can not open the file: $! ";
While (defined ($ eachline = <FILE> )){
Chomp $ eachline;
# Do what u want here!
}
Close FILE;