获取参考。预期内容

Question

我有这个脚本

#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;
use YAML::Syck;

my $x = {'x' => [1,2,3],
     'y' => {'z' => 8},
     'q' => 'abc',
};

my $yaml = YAML::Syck::Load($x);
print "\n" . $yaml . "\n\n\n";

my $h = YAML::Syck::Dump($yaml);
print Dumper $h;

，它输出

HASH(0x7539cb0)


$VAR1 = '--- HASH(0x7539cb0)
';

我期望看到 $x 内容的结构。那里出了什么问题？

Answer 1

您应该使用 Dump 将 Perl 数据结构转储到 YAML 中，并使用 Load 执行相反的操作。
尝试：

my $yaml = YAML::Syck::Dump($x);
print "\n" . $yaml . "\n\n\n";

my $h = YAML::Syck::Load($yaml);
print Dumper $h;

Answer 2

您将 Load() 和 Dump() 颠倒了； Load 采用 YAML 并生成 perl 数据结构； Dump 采用 perl 数据结构并生成 YAML。