最近动态
2020-03-21 13:16 回答问题
#!/usr/bin/perl# Filename: repalce.pl# Description:replace the file ID.# Author：xueqc_# Vision: 1.00# Date: 2020.03.21# Usage：perl repalce.pl list.file fa.file out.fileuse warnings;use strict;my @Gene_Alisa_ID;my @error_record;my $i="";open LIST,"<$ARGV