open  OUT, ('>'."$path/$name.faa" || die ("cannot open out $file $!\n"));