open(IN, '<',$filename)