note
poj
From the docs;
<blockquote><c>$alignment = $bam->read1()
Read one alignment from the BAM file and return it as a Bio::DB::Bam::Alignment object.</c></blockquote>
<p>You need to use the methods in [cpan://Bio::DB::Bam::Alignment] to access the information.
For example </p>
<c>
while (my $align = $bam->read1) {
my $seqid = $align->seq_id;
my $start = $align->start;
my $end = $align->end;
my $strand = $align->strand;
my $ref_dna= $align->dna;
}
</c>
<br/>
poj
1040247
1040247