my ($bytesread, $buffer); # better to declare outside the loop while ($bytesread = read(OUTFILE2, $buffer, 1024)) { print OUTFILE $buffer; }