open( FILE,'<',$file ) || die "Can't open $file";