open my $in1FH, q{<}, $DATA_DIR/$INFILE_NAME
   or die qq{Can't open $INFILE_NAME: $!\n};