Help for this page
1: open (DATA, "$inputdir/$inputfile"); 2: while (<DATA>) { ... 9: } 10: } 11: close(DATA);