解冻使用Storable::nfreeze存储的数据结构时遇到问题？

Question

我将一组数据存储在MySQL表的单个列中。我可以访问在那里存储它的大约5年前的perl代码&可以看到它都是在存储之前用Storable::nfreeze冻结的散列。MySQL列为TEXT，表设为latin1编码。我现在正在尝试检索这些数据，以便一次性导出。我知道这个应用程序最初是在perl 5.8.x上运行的，所以我尝试使用perl-5.8.8。不幸的是，我不知道使用了什么版本的Storable。

我首先尝试使用最新的Storable，2.39。这给了我：

Storable binary image v32.32 more recent than I am (v2.9) at
perlbrew/perls/perl-5.8.8/lib/5.8.8/darwin-2level/Storable.pm line 417`

使用Storable-2.14，我可以得到

Storable binary image v32.32 more recent than I am (v2.7) at blib/lib/Storable.pm
(autosplit into blib/lib/auto/Storable/thaw.al) line 363

使用Storable-2.13我得到了

Storable binary image v2.7 more recent than I am (v2.6) at blib/lib/Storable.pm  
(autosplit into blib/lib/auto/Storable/thaw.al) line 363

>= 2.14中不合理的二进制图像数字让我认为这些数字的解析方式发生了一些变化。我相信这段代码可能是在32位操作系统上运行的，现在我在一台64位的机器上尝试，这可能是相关的吗？下一步，我将尝试在2.13和2.14之间运行差异，看看是否可以找出导致变化的原因。

有任何人可以给出的指导吗？

谢谢!

Answer 1

Format 2.7首先与Storable2.14一起使用。

Perl的整数的大小(而不是机器的整数的大小)确实会导致无法解析数据。

Answer 2

我也遇到过类似的问题，但事实证明，我需要先解码该值，然后才能解冻它。所以,

use Storable qw( thaw );
use MIME::Base64 qw( decode_base64 );
my $data = thaw( decode_base64( $frozen_thing ) );

在我的例子中，数据是使用Apache::Session::Serialize::Base64存储的。我曾假设它是使用Apache::Session::Serialize::Storable存储的，因此出现了问题。在这种情况下，错误消息是无关紧要的，但至少您知道有问题。