my @filez=(file1,file2);
open(file1,">$path1");
open(file1,">$path2");

for (my $i=0 ; $i ; $i<$node_nb; $i++) {
$file=$filez[$i];
print $file "some data";
}