Help for this page

Select Code to Download


  1. or download this
    use strict;
use Storable qw(freeze thaw);
...
    %thawed = %{ thaw $frozen };
};
if($@) { warn "there was a THAWING error\n" }
  2. or download this
    eval {
    my $foo = thaw 'asdasdasdasd'; 
};
if($@) { warn "there was a THAWING error\n" }
  3. or download this
    $ ./foo.pl
there was a THAWING error
error while freezing: Bad hash at blib/lib/Storable.pm (autosplit into
+ blib/lib/auto/Storable/_freeze.al)
   line 261, at ./foo.pl line 19