如何调用blastn ?

如何调用blastn ?
[size=3]已知数组@array = ($seqA,$seqB, $seqC, $seqD, $seqE, $seqF, $seqG, $seqH, $seqI,),
$goldsequence=’NC_0001.fna’
调用blastn函数，使得@array[i]与$goldsequence进行比对，如果$goldsequence存在@array[i]，(即$goldsequence序列中存在@array[i]核酸序列)，则保留该@array[i], 并将所有的@array[i]组成一个新数组@newarray.

希望能给予一个perl程序, 我好好学习学习

谢谢[/size]

你问的都是很基础的 Perl,.
你问的都是很基础的 Perl, 推荐你先自学一下 Perl，自己尝试解决，然后再考虑问问题。