Lines Matching refs:INPUT
125 open INPUT, "$directory/$fname" or warn "can't open $directory/$fname: $!";
136 while (<INPUT>) {
159 close INPUT;
194 open INPUT, "$directory/$fname" or warn "can't open $directory/$fname: $!";
212 while (<INPUT>) {
253 close INPUT;
286 open INPUT, "$directory/$fname";
289 close INPUT;
301 open INPUT, "<$in_file" or die "can't open $in_file: $!";
304 while (<INPUT>) {
346 close INPUT;