open ($FH,'<',$fn);