The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use FindBin '$Bin';
use lib $Bin;
use TestYAMLTests tests => 1;

my $yaml = <<"...";
---
bar: \xC3\x83\xC2\xB6
foo: \xC3\xB6
...

my $hash = {
    foo => "\xF6",    # LATIN SMALL LETTER O WITH DIAERESIS U+00F6
    bar => "\xC3\xB6" # LATIN SMALL LETTER O WITH DIAERESIS U+00F6 (UTF-8)
};

is Dump($hash), $yaml, 'Dumping native characters works';