Bio::SeqIO

It’s in the pack­age “Biop­erl”->“Bio::SeqIO”.

1.open file

my $io = Bio::SeqIO->new(-file => "noN.fa",-format => "fasta");

2. read­in one sequence

my $record = $io -> next_seq;

3. vari­able

$record->id:     #identifier
$record->desc:   #description
$record->length: #length of this sequence
$record->seq:    #sequence

 

Leave a Reply

Your email address will not be published. Required fields are marked *