[Bioperl-l] Using Storable with SeqFeatures

Johnston, Caroline Caroline.Johnston at iop.kcl.ac.uk
Wed Sep 24 10:19:05 EDT 2008


I'm trying to use Storable to save a Bio::Seq object and Storable seems to be having a weird problem dealing with freezing and thawing the code ref to Bio::SeqFeature::Generic cleanup_generic. If I change one line (931) in that function from

    foreach my $t ( keys %{$self->{'_gsf_tag_hash'} || {} } ) {

    foreach my $t ( keys %{$self->{'_gsf_tag_hash'} } ) {

it works fine. I've pasted an example script at http://sial.org/pbot/32320.

Any ideas why this syntax would break Storable? Would wrapping the foreach in an if(defined $self->{'_gsf_tag_hash'}) serve to replace the || {} ?

I get the same problem using Bio::Root::Storable.


More information about the Bioperl-l mailing list