zcat clean.1.fq.gz |head -12|perl -alne '{if()-31)}(split//,$) }else{print}}'
引自:
http://www.bio-info-trainee.com/2946.html
zcat clean.1.fq.gz |head -12|perl -alne '{if()-31)}(split//,$) }else{print}}'
引自:
http://www.bio-info-trainee.com/2946.html