假设我有一个使用 Data::Dumper
创建的文本文件,大致如下:
my $x = [ { foo => 'bar', asdf => undef }, 0, -4, [ [] ] ];
我想读回那个文件并得到
$x
背部。我试过这个:my $vars;
{
undef $/;
$vars = <FILE>;
}
eval $vars;
但它似乎不起作用——
$x
不仅没有定义,当我尝试使用它时,我会收到一个警告Global symbol $x requires explicit package name.
这样做的正确方法是什么? (是的,我知道它很丑。它是一个快速实用的脚本,而不是生命支持系统。)
最佳答案
这是一个提供几个不同选项的线程:Undumper
如果您只是在寻找数据持久性,那么 Storable 模块可能是您最好的选择。
关于perl - 如何回读 Data::Dumper 的输出?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/418027/