Select Code to Download

#!/usr/bin/perl
use warnings;
...
my $char = "\N{LATIN SMALL LETTER U WITH DIAERESIS}";
binmode *STDOUT, ':encoding(UTF-8)';
print normalize($_, $char), ' ' for qw( D C );

00000000: 75cc 8820 c3bc 20                        u.. ..