#!/usr/bin/perl --
use CGI;
binmode STDOUT, ':encoding(UTF-8)';
print CGI->header(qw/-charset UTF-8/);
print "\N{U+2319}\N{U+2330}\N{U+2335}\N{U+2368}\N{U+2319}\N{U+2350}\N{U+2354}";