for($i=0......){
$filename = "file.".$i
open (FILE ">>$filename")
print FILE 'i am gonna print in this file';
close (FILE);
}