[Bioperl-l] Problems to get secondary accessions from an object

[stephan]

Hi,

I have problems to get the secondary_accessions from an seq object.

E.G

$inx = Bio::Index::Swissprot->new($Index_File_Name);
$prot = $inx->fetch( $accarray[ $_[0] ] );
#"$accarray[ $_[0]" is an array of accessions

print "Description: " . $prot->description . "\n";
print "Accessions: " .$sec . "\n";
print "Species: " . $prot->species->binomial() . "\n";
print "Length: " . $prot->length . "\n";
#this looks good

@a = $prot->get_secondary_accessions;
#@a is empty!

Seems that $prot is not a reference to a rich:seq object or somthing 
other is wrong.

Hope that someone can help me.

regards
stephan