use YAML;
my ($hashref) = YAML::LoadFile("test.yaml");

print Dump ($hashref);

print $h;