open (DATA, "< C:/Perl_Scripts/InputFile.txt");