my @fileHandles = map { 
    open my $fh, '<', $_ or die "Can't open $filename $!";
    $fh;
} @fileNames;