in reply to Problem with File Handler

file1 is a bareword and it's not allowed by use strict refs;. Try:

my @filez = ('file1', 'file2');

or

my @files = qw/file1 file2/;

Update: text above striked through (wrong answer). The real problem is that strict refs doesn't allow passing typeglobs by symbolic reference.