在 Perl 中加载一个序列化变量

Question

我有一个文件，我在其中存储了一个序列化的perl哈希。在我当前的脚本中，我加载了如下值：

my $arrayref = retrieve("mySerializedFile");
my $a = $arrayref->[0];
my $b = $arrayref->[1];
my $c = $arrayref->[2];

我的问题是该文件大约是 1GB，因此加载大约需要 10 秒，然后执行一些操作需要一秒钟。我想减少retrieve时间。

有没有办法在脚本执行之前加载此信息？我的意思是，mySerialiedFile 不应该在很长一段时间内更改，所以如果我能让它始终在系统上加载会很好，并且可以将我的执行时间从 11 秒缩短到 1。

Answer 1

按照评论中的建议，我使用了数据库引擎，它大大缩短了执行时间，现在大约是 5 秒。