Mega Code Archive

 
Categories / Perl / File
 

Open (FILEHANDLE, FILEHANDLE2)

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