#!/usr/bin/perl

use strict;
use warnings;

use YAML::Syck;

my @in     = <DATA>;
my $in     = join("",@in);
my $dat    = Load($in);

1;

__DATA__
---
x : &#259;