Получение справки. Ожидаемый контент

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 () в обратном порядке;Загрузка принимает YAML и создает структуру данных perl;Dump принимает структуру данных perl и создает YAML.