File Handler

[kokarikomi]

Hi,

I have encountered this problem lately but I don't know how to solve it.

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";
}

I have an error with the print $file ... which says 'Can't use string ("file1") as a symbol ref while "strict refs" in use'

Someone can help me with that?

Thank you,

R.

 

[thenewa2x]

my @files = ("file1","file2");
or
my @files = qw(file1,file2);

---------------------------------------
If you helped... thx.

 

[kokarikomi]

Actually I found the solution.
the way to write it is:

my @files=(*file1,*file2);

thxs anyway.

R.

 

[thenewa2x]

np

---------------------------------------
If you helped... thx.