Mega Code Archive

 

Categories / Perl / File

 

Open (FILEHANDLE2, =FILEHANDLE)

open FILEHANDLE, "<file.txt" or die "Can not open file"; open (FILEHANDLE2, "<&=FILEHANDLE"); while (<FILEHANDLE2>) {     print; }