for my $file (@fileNames) {
        open (FILE, "<", $file) or die "Couldnt open file:  $file\n";