有idlist.txt (包括gene_id 列（A列），和其对应的配对关系B列 ), 另还有一个sequence_fasta.fa文件（含基因gene_id），现想利用idlist配对关系，批量替换sequece_fasta文件中的gene_id. 请问怎么写perl脚本批量替换， 实现 perl  ？？.pl  idlist  seequnces_fasta.fa  output.txt