24 Sep 16:17
Using Storable with SeqFeatures
From: Johnston, Caroline <Caroline.Johnston <at> iop.kcl.ac.uk>
Subject: Using Storable with SeqFeatures
Newsgroups: gmane.comp.lang.perl.bio.general
Date: 2008-09-24 14:19:05 GMT
Subject: Using Storable with SeqFeatures
Newsgroups: gmane.comp.lang.perl.bio.general
Date: 2008-09-24 14:19:05 GMT
Hello.
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'} || {} } ) {
------
to
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.
Cxx
RSS Feed