String Perl

#!/usr/bin/perl
use strict;
use warnings;
binmode STDOUT,":utf8";
print "\x{470} is a Cyrillic capital Psi\n";