[Bioperl-l] PBbl2seq Object

[Holger Tupath]

Hi,
I want to use the PBbl2seq Object to parse an output file from bl2seq.
The module works fine for the first entry in the output file, but how do I 
get the data for the next entry ?

Does anybody have an example script ?




This code snippet prints all the data in the object, after creation from the 
output file. (prints the first entry in the file)

#!/usr/bin/perl

use Bio::Tools::BPbl2seq;
my $report = Bio::Tools::BPbl2seq->new(-file => 'blast_output');


print "match() -> ".$report->match()."\n";
print "P() -> ".$report->P()."\n";
print "percent() -> ".$report->percent()."\n";
print "positive() -> ".$report->positive()."\n";
print "score() -> ".$report->score()."\n";
print "bits() -> ".$report->bits()."\n";
print "query() -> ".$report->query()."\n";

print "querySeq() -> ".$report->querySeq()."\n";
print "sbjctSeq() -> ".$report->sbjctSeq()."\n";
print "homologySeq() -> ".$report->homologySeq()."\n";

print "qs() -> ".$report->qs()."\n";
print "ss() -> ".$report->ss()."\n";
print "hs() -> ".$report->hs()."\n";


thanx !


Holger