хмм... Вот что получается

Warning: fwrite(): supplied argument is not a valid stream resource in....

Гдето ошибка. Редактор говорит что тут
начинается...

for($i=count($f1);$i>count($f1)-10;$i--){
fwrite($f2, $f1[$i]."\n");
}
fclose($f);
?>