open (IN, "<",  $dir/$file")