$_ = "\x{0411}\n"; # Cyrillic capital letter BE

binmode( STDOUT, ":utf8" );

print;  # Look, ma, no warning!