open my $inFile, '<', $dataFileName or die "Unable to open $dataFileName: $!\n";