$_ = "my newline\n" if ($i == 3); print TEMP $_;