while (<IN_FILE>)
{
    print OUTFILE $_;
}