Bio::Seq::PrimaryQual 1.4

Bio::Seq::PrimaryQual is a Bioperl module with lightweight quality object.

SYNOPSIS

use Bio::Seq::PrimaryQual;

# you can use either a space-delimited string for quality

my $string_quals = "10 20 30 40 50 40 30 20 10";
my $qualobj = Bio::Seq::PrimaryQual->new
( '-qual' => $string_quals,
'-id' => 'QualityFragment-12',
'-accession_number' => 'X78121',
);

# _or_ you can use an array of quality values

my @q2 = split/ /,$string_quals;
$qualobj = Bio::Seq::PrimaryQual->new( '-qual' => @q2,
'-primary_id' => 'chads primary_id',
'-desc' => 'chads desc',
'-accession_number' => 'chads accession_number',
'-id' => 'chads id'
);

# to get the quality values out:

my @quals = @{$qualobj->qual()};

# to give _new_ quality values

my $newqualstring = "50 90 1000 20 12 0 0";
$qualobj->qual($newqualstring);

Product's homepage

Requirements:

· Perl